このディレクトリの索引
http://toro.2ch.net/test/read.cgi/tech/1276873238/840
#  rubyで入力した自然数nの階乗n!を表示するプログラムが何でか知らんができない 
#  誰か暇なときでいいんで教えて 
# 
# 

'自然数nの階乗n!を表示する'(_n) :-
        '自然数nの階乗n!を'(1,_n,1,_自然数nの階乗),
        表示する(_n,_自然数nの階乗).

'自然数nの階乗n!を'(_n,_n,Y,_自然数nの階乗) :-
        _自然数nの階乗 is _n * Y.
'自然数nの階乗n!を'(_m,_n,Y_1,X) :-
        _m < _n,
        Y_2 is _m * Y_1,
        _m_2 is _m + 1,
        '自然数nの階乗n!を'(_m_2,_n,Y_2,X).

表示する(_n,_自然数nの階乗) :-
        writef('自然数%tの階乗は %t です。\n',[_n,_自然数nの階乗]).