2007-10-19 問題1-37(b) SICP (a)のcont-fracは反復的プロセスなので、今度は再帰的プロセスをつかう。 (define (cont-frac-recur n d k) (define (cont-frac-recur-sub n d k i) (if (= k i) (/ (n i) (d i)) (/ (n i) (+ (d i) (cont-frac-recur-sub n d k (+ i 1)))))) (cont-frac-recur-sub n d k 1))