トップページ
⇒
tech
108コメント
27KB
再 帰
全部
前100
次100
最新50
■ このスレッドは過去ログ倉庫に格納されています
0049
デフォルトの名無しさん
2006/01/11(水) 10:49:31
fact(0) :- !.
fact(N) :- N > 0,write(うわ),M is N * -1,fact(M).
fact(N) :- write(あ),M is N + 1,fact(M).
全部
前100
次100
最新50
■ このスレッドは過去ログ倉庫に格納されています