いろんな言語で宿題スレ
at TECH
173:デフォルトの名無しさん
09/06/15 19:01:53
>>172
% Prolog
整数1〜10までの累計(X) :-
sum(0,1,10,X).
sum(_空リストの時の値,[],_空リストの時の値). /* _空リストの時の値は 0 か 0.0 */
sum(_空リストの時の値,[A|R1],X) :-
sum(_空リストの時の値,R,Y),
X is A + Y.
次ページ続きを表示1を表示最新レス表示スレッドの検索類似スレ一覧話題のニュースおまかせリスト▼オプションを表示暇つぶし2ch
4630日前に更新/314 KB
担当:undef