This is what I have so far, but I'm not sure if I am even on the right path. Some expert advice would be greatly appreciated!
(define (cube-root n p)
(if (good-enough? n p)
n
(cube-root (improve n ?) p))
)
(define (improve x y)
(/
(+
(/ x (expt y 2))
(* (2 y)))
3)
(define (good-enough? n p)
(< (abs (- (cube x) n) p))
)

New Topic/Question
Reply


MultiQuote




|