2018-01-13から1日間の記事一覧

SICPゼミ第57回[tube_worm死す]

練習問題4.35 (define (an-integer-between low high) (require (<= low high)) (amb low (an-integer-between (+ low 1) high))) 練習問題4.36 (define (a-pythagorean-triple-between) (let ((high (an-integer-starting-from 1))) (let ((i (an-integer-b…