例題1.1.7 (define (average x y) (exact->inexact (/ (+ x y) 2))) (define (improve guess x) (average guess (exact->inexact (/ x guess)))) (define (good-enough? guess x) (< (abs (- (square guess) x)) 0.001)) (define (sqrt-iter guess x) (if (g…
引用をストックしました
引用するにはまずログインしてください
引用をストックできませんでした。再度お試しください
限定公開記事のため引用できません。