?- 'a##'. c157-547#
このディレクトリの索引
http://toro.2ch.net/test/read.cgi/tech/1335517816/547
#  2の2012乗の下3桁を標準出力に出力するプログラムを作成しなさい。 
#   
#  言語 : C++言語 
#  OS  :Windows xp 
#      Visual C++ 6 
#   

'2の2012乗の下3桁を標準出力に出力する' :-
        '2の2012乗の下3桁を標準出力に出力する'(0,1).

'2の2012乗の下3桁を標準出力に出力する'(2012,X) :-
        writef('%t',[X]).
'2の2012乗の下3桁を標準出力に出力する'(N,X) :-
        Y is (X * 2) mod 1000,
        N_2 is N + 1,
        '2の2012乗の下3桁を標準出力に出力する'(N_2,Y).