いろんな言語で宿題スレ

いろんな言語で宿題スレat TECH

いろんな言語で宿題スレ - 暇つぶし2ch231:デフォルトの名無しさん
09/06/18 17:26:54
>>226 書き直し
% Prolog
gcd(M,N,N) :-
　　0 is M mod N,!.
gcd(M,N,X) :-
　　Mod is M mod N,
　　gcd(N,Mod,X).

gcd(M,N,O,X) :-
　　gcd(M,N,Y),
　　gcd(Y,O,X).

次ページ

続きを表示

1を表示