値の交換

Schemeで値の交換

(define a 10)

(define b 5)

(print "a is " a)

(print "b is " b)

(print "Exchange!!")

(define c a)

(define a b)

(define b c)

(print "a is " a)

(print "b is " b) 

 

Gauche 0.9.9での実行結果は以下の通り。

a is 10
b is 5
Exchange!!
a is 5
b is 10

実行結果をもっといい感じで表示したい。。。

参考文献

• 奥村晴彦『C言語による標準アルゴリズム辞典』 技術評論社
• 吉田武『素数夜曲』 東京大学出版会