このディレクトリの索引
http://pc12.2ch.net/test/read.cgi/tech/1269438098/866
#  大学のC言語の課題です。教えてください。 
#  問題：３人の成績を入力すると最高点を出力するプログラムを作りましょう。 
#  自分ではこの辺まで分かったのですが、最高点というものをどう処理したらいいのでしょうか。 
#  int score[5]; 
#  int i; 
#  int max_score; 
#  max_score = 0; 
#   
#    for(i=0; i<=4; i=i+1){ 
#      printf("成績を入力してください。\n"); 
#      scanf("%d",&score[i]); 
#    } 
# 

３人の成績を入力すると最高点を出力する :- 
        ３人の成績を入力すると(L), 
        最高点を出力する(L). 

３人の成績を入力すると(L) :- 
        findall(N,for(1,M,3),get_integer(N)),L). 

最高点を出力する(L) :- 
        最高点(L,_最高点), 
        write('最高点は %t点です\n',[_最高点]). 

最高点([A|R],X) :- 最高点(R,A,X) . 

最高点([],X,X) :- !. 
最高点([A|R],B,X) :- A @> B,最高点(R,A,X),!. 
最高点([_|R],A,X) :- 最高点(R,A,X).