このディレクトリの索引
http://hibari.2ch.net/test/read.cgi/tech/1308749241/177
#   
#  [2]下記の九九の表を作るプログラムを作れ 
#   
#  1  
#  2 4    
#  3 6 9 
#  .......  
#  8 16 24...64 
#  9 18 27...72 
#  

変則的な九九の表を作る :-
        for(1,N,9),
        for(1,M,N),
        _積 is N * M,
        表示する(N,M,_積),
        M = N,
        nl,
        N = 9.

表示する(9,9,_) :- !.
表示する(N,M,_積) :-
        writef('%2r ',[_積]).