Code Review
Compare your solutions
#| BEGIN (Введите свое решение) |#
(define (cube-root x)
(define (cube-iter y)
(if (good-enough? y)
y
(cube-iter (improve y))))
(define (good-enough? y)
(< (abs (- (* y y y) x)) 0.0001))
(define (improve y)
(/ (+ (/ x (* y y)) (* 2 y)) 3))
(cube-iter 1)
)
#| END |#