このディレクトリの索引
http://hibari.2ch.net/test/read.cgi/tech/1301553333/99
#  [1] 授業単元:整数演算 
#  [2] 問題文(含コード&リンク):以下の問題に答えなさい 
#             
#   50 
#  Σ((3*i)/2)  = A の計算式を計算できるプログラムを完成させなさい。 
#   i=0 
#   
#  

'50\\nΣ((3*i)/2)  = A の計算式を計算できるプログラムを完成させなさい\\ni=0'(_A) :-
        findsum(_j,(
                    for(0,_i,50),
                    _j is 3 * _i / 2),
                _A).