练习1.17
这道题中有2个需要我们自己先写出来的函数double和halve，当然了，这都非常容易实现:
(define(double x)
(+ x x))
(define(halve x)
(/ x 2))
题目中要求我们设计一个类似于fast-expt的求乘积的过程，并且只用对数的步数。
(define(* x y)
(cond ((= y 0) 0)
((even? y) (double (* x (halve y))))
((odd? y) (+ x (* x (- y 1))))))
我们继续来测试一下：
(*2 10)
;Value:20
(*3 60)
;Value: 180原文地址：http://blog.csdn.net/nomasp/article/details/43532713
