このディレクトリの索引
http://pc12.2ch.net/test/read.cgi/tech/1260532772/206
#  [1] 授業単元: プログラミング1 
#  [2] 問題文(含コード&リンク): http://ime.nu/kansai2channeler.hp.infoseek.co.jp/cgi-bin/joyful/img/10285.txt 
#  
# 発展課題1
# 2−4+6−8・・・・・−100の計算を行うプログラムを作成せよ。実行結果の例を以下に示す。
# ------------------------------------------------
# 答えは-50です。
# ------------------------------------------------
# ヒント:一回ごとに符号を変えることを考えてみましょう(a = -a)

'2−4+6−8・・・・・−100の計算を行う'(_答え) :-
        '2−4+6−8・・・・・−100の計算を行う'(2,2,-,_答え).


'2−4+6−8・・・・・−100の計算を行う'(100,_答え,_,_答え) :- !.
'2−4+6−8・・・・・−100の計算を行う'(N1,S1,+,_答え) :-
        N2 is N1 + 2,
        S2 is S1 + N2,
        '2−4+6−8・・・・・−100の計算を行う'(N2,S2,-,_答え),!.
'2−4+6−8・・・・・−100の計算を行う'(N1,S1,-,_答え) :-
        N2 is N1 + 2,
        S2 is S1 - N2,
        '2−4+6−8・・・・・−100の計算を行う'(N2,S2,+,_答え),!.