【SICP练习】10 练习1.16



练习1.16

这道题题目特别长，说的无非就是要用一个不变量记录中间结果，然后写出对数步数内的通过迭代来计算幂的函数，当然了还要用到题目中括号内的那个关系。下面就直接上代码了：

(define(fast-expt b n)

      (fast-expt-iter 1 b n))

(define(fast-expt-iter a b n)

      (cond ((= n 0) a)

              ((even? n) (fast-expt-iter a

                                                        (square b)

                                                        (/ n 2)))

               ((odd? n) (fast-expt-iter (* a b)

                                                        b

                                                        (- n 1)))))

写完代码无一例外的就是测试了:

(fast-expt2 30)

;Value:1073741824

(fast-expt0.123 4)

;Value:.000228886641