このディレクトリの索引
http://hibari.2ch.net/test/read.cgi/tech/1291471791/948
#  これを変更して,配列に格納されている整数の最大値と最小値を表示する様にせよ. 
#   

最大値・最小値(_対象ならび,_最大値,_最小値) :-
        _対象ならび = [A|R],
        最大値・最小値(R,A,A,_最大値,_最小値).

最大値・最小値([],_最大値,_最小値,_最大値,_最小値) :- !.
最大値・最小値([A|R],_最大値1,_最小値1,_最大値,_最小値) :-
        '大きいか等しい方'(A,_最大値1,_最大値2),
        '小さいか等しい方'(A,_最小値1,_最小値2),
        最大値・最小値(R,_最大値2,_最小値2,_最大値,_最小値).

'小さいか等しい方'(A,B,A) :-
        A @=< B,!.
'小さいか等しい方'(_,B,B).

'大きいか等しい方'(A,B,A) :-
        A @>= B,!.
'大きいか等しい方'(_,B,B).