このディレクトリの索引
http://toro.2ch.net/test/read.cgi/tech/1357748713/78
#  [1] 授業単元：C言語 
#  [2] 問題　http://ime.nu/codepad.org/yV0KrZox 
#  
#  問題1
#  5個の整数を次々に入力して、一元配列に格納し、その平均を計算するプログラムを作成しなさい。
#  -------------------------------------------------------------------
#  整数1：40
#  整数2：35
#  整数3：28
#  整数4：15
#  整数5：16
#  平均は26.8000です
#  ---------------------------------------------------------------------
#  

'5個の整数を次々に入力して、一元配列に格納し、その平均を計算する' :-

        '5個の整数を次々に入力して、一元配列に格納し、'(_一次元配列),
        その平均を計算する(_一次元配列,_その平均).

'5個の整数を次々に入力して、一元配列に格納し、'(_一次元配列) :-
        findall(_整数,(
                    between(1,5,N),
                    atomic_list_concat([整数,N,': '],_催促),
                    writef('%t',[_催促]),
                    整数を得る(_整数)),
                _一次元配列).

その平均を計算する(_一次元配列,_その平均) :-
        findavg(_値,(
                    member(_値,_一次元配列)),
                 _その平均),
        writef('平均は%tです\n',[_その平均]).