このディレクトリの索引
http://hibari.2ch.net/test/read.cgi/tech/1307166756/762
#  [1] 授業単元:C言語! 
#  [2] 問題文(含コード&リンク):クラスごとの平均点の出力のかわりに,全クラスで得点の高い者順に,クラス・出席番号・得点のセットのデータ出力を行うプログラムを作成せよ. 
#  <実行例> 
#  $ ←プログラム実行のコマンドを入力 
#  ( 0) クラス:2 出席番号:5 得点:97 
#  ( 1) クラス:2 出席番号:3 得点:89 
#  ( 2) クラス:2 出席番号:1 得点:83 
#  ( 3) クラス:2 出席番号:4 得点:77 
#  ( 4) クラス:2 出席番号:2 得点:71 
#  ( 5) クラス:2 出席番号:0 得点:63 
#   
#  


'クラスごとの平均点の出力のかわりに,全クラスで得点の高い者順に,クラス・出席番号・得点のセットのデータ出力' :-
        findall([_得点,_クラス,_出席番号],(
                    成績(_クラス,_出席番号,_得点)),
                LL1),
        sort(LL1,LL2),
        reverse(LL2,LL3),
        append(L0,[[_得点,_クラス,_出席番号]|R],LL3),
        length(L0,_nth),
        writef('(%t) クラス:%t 出席番号:%t 得点:%t\n',[_クラス,_出席番号,_得点]),
        R = [].