SICP勉強会2日目。図もいくつか描いたけど、アップするのが面倒くさい。コードは次のような感じ。けっこう演習問題をはしょってる。 ; 3.3.1 --------------------------------------------------- (define (mystery x) (define (loop x y) (if (null? x) y …

SICP勉強会をした。やった範囲は3.1.1から3.2.1まで。書いたコード ; 3.1.1 --------------------------------------------------- (define balance 100) (define (withdraw amount) (if (>= balance amount) (begin (set! balance (- balance amount)) bala…