SICP:反复用加法来实现乘法 1.17
摘要：
#lang racket(define (fast-multiplication a b n);a*n (cond ((= n 0) b);n==0 ((even? n) (fast-multiplication (double a) b ... 阅读全文
posted @ 2015-03-21 14:30 Zachary_wiz 阅读(122) 评论(0) 推荐(0) 编辑
SICP:对数步数内迭代计算幂的函数
摘要：
在SICP 32(48)页根据书中给出的关系(bn/2)2=(b2)n/2，并且使用一个不变量记录中间结果，写出对数步数内迭代计算幂的函数：方法一(not me)：;;; 16-fast-expt.scm(define (fast-expt b n) (expt-iter b n 1))(de... 阅读全文
posted @ 2015-03-21 13:19 Zachary_wiz 阅读(183) 评论(0) 推荐(0) 编辑
