Accsc的博客

原创 SICP练习

练习1.8 (define (good-enough? old new) (and (< (/ old new) 1.001) (> (/ old new) 0.999))) (define (improve guess x) (/ (+ (/ x (* guess guess)) (* 2 guess)) 3)) (define (cube-root guess...