このディレクトリの索引
http://toro.2ch.net/test/read.cgi/tech/1339338438/842
#  【質問テンプレ】  
#  [1] 授業単元:プログラミング  
#  [2] 問題文(含コード&リンク): 
#  整数型配列に格納された5個の整数{8,5,12,7,9}を大きい数の順に並べて表示するプログラム作成する。 
#   
#  

'5個の整数{8,5,12,7,9}を大きい数の順に並べて表示する'(A,B,C,D,E) :-
        '整数を大きい数の順に並べて表示する'([8,5,12,7,9],[A,B,C,D,E]).

'整数を大きい数の順に並べて表示する'(L1,L3) :-
         交換(L1,L2),
         '整数を大きい数の順に並べて表示する'(L2,L3),!.
'整数を大きい数の順に並べて表示する'(L,L).

交換([],[]) :- !,fail.
交換([A,B|R1],[A|R2]) :-
        A > B,
        交換([B|R1],R2).
交換([A,B|R1],[B,A|R1]) :-
        A =< B,!.