このディレクトリの索引
http://toro.2ch.net/test/read.cgi/tech/1325685876/285
#  [1] 授業単元:計算機アルゴリズム [2] 問題文(含コード&リンク):
#  (1).2つの整数を引数で持ち、小さい方を出力する関数、imin2(整数,整数)を作成し、 imin2を使用した4つの数値を入力して最小値を 出力するプログラムを作成せよ。 
#   
#  (2).半径1の円に内接したn角形の面積Sを求め よ。またn=100のケースと手計算の 円の面積を比較せよ(n-100のケースのプログラム の結果をプログラムの下に貼り付ければ良い). 
#   

imin2(_整数,_整数,_整数).
imin2(_整数1,_整数2,_整数1) :-
        _整数1 < _整数2.
imin2(_整数1,_整数2,_整数2) :-
        _整数1 > _整数2.

'2つの整数を引数で持ち、小さい方を出力する関数、imin2(整数,整数)を作成し、imin2を使用した4つの数値を入力して最小値を出力する'(_数値1,_数値2,_数値3,_数値4,_最小値) :-
        imin2(_数値1,_数値2,_準決勝勝者1),
        imin2(_数値3,_数値4,_準決勝勝者2),
        imin2(_準決勝勝者1,_準決勝勝者2,_最小値).