このディレクトリの索引
http://hibari.2ch.net/test/read.cgi/tech/1322562648/439
#  [1] 授業単元: アルゴリズム 
#  [2] 問題文(含コード&リンク): 
#  リスト構造を使用して平均を求めるプログラムの作成  
#  

リスト構造を使用して平均を求める(_リスト,_平均) :-
        length(_リスト,_要素数),
        sum(_リスト,_合計),
        _平均 is _合計 / _要素数.

sum([],0).
sum([_値|R],_合計) :-
        sum(R,_合計_1),
        _合計 is _合計_1 + _値.