このディレクトリの索引
http://hibari.2ch.net/test/read.cgi/tech/1284632294/987
#  [1] 授業単元:プログラミング実習 
#  [2] 問題文(含コード&リンク):組み合わせ数を答えがオーバーフローするギリギリまで求めよ。C[n, n / 2]をnを1から1づつ増やしてその答えを一行ごとに出力せよ。 
#  

'組み合わせ数を答えがオーバーフローするギリギリまで求めよ。C[n, n / 2]をnを1から1づつ増やしてその答えを一行ごとに出力せよ。' :-
        組み合わせ数の表示(1),!.

組み合わせ数の表示(N) :-
        exception_handler(_組み合わせ数 is N * N // 2,error(E,I),fail),
        write_formatted('%t\n',[_組み合わせ数]),
        N2 is N + 1,
        組み合わせ数の表示(N2),!.
組み合わせ数の表示(_).