摘要: 为什么要把iter塞到sum里面去: 嗯,为了减少通信开销. 回头看递归写法: "我们要以困难的方式搞定它!" 阅读全文
posted @ 2017-11-24 23:37 R4mble 阅读(203) 评论(0) 推荐(0)
摘要: (define (sum term a next b) (if (> a b) 0 (+ (term a) (sum term (next a) next b)))) (define (integral f a b dx) ;积分 (define (add-dx x) (+ x dx)) (* (sum f (+ a (/ dx 2.0)... 阅读全文
posted @ 2017-11-24 23:26 R4mble 阅读(191) 评论(0) 推荐(0)
摘要: 对过程的抽象: 填充: 拓展: 阅读全文
posted @ 2017-11-24 23:02 R4mble 阅读(145) 评论(0) 推荐(0)
摘要: (define (next n) (if (= n 2) 3 (+ n 2))) (define (find-divisor n test-divisor) (cond ((> (square test-divisor) n) n) ((divides? n test-divisor) test-divisor) (else (f... 阅读全文
posted @ 2017-11-24 22:00 R4mble 阅读(213) 评论(0) 推荐(0)
摘要: (define (next-odd n) (if (odd? n) (+ 2 n) (+ 1 n))) (define (smallest-divisor n) (find-divisor n 2)) (define (find-divisor n test-divisor) (cond ((> (square test-divisor) n) n) ... 阅读全文
posted @ 2017-11-24 21:45 R4mble 阅读(237) 评论(0) 推荐(0)
摘要: 19919997 阅读全文
posted @ 2017-11-24 21:07 R4mble 阅读(225) 评论(0) 推荐(0)
摘要: 你写的算法,银河一号都跑不动. 阅读全文
posted @ 2017-11-24 20:57 R4mble 阅读(110) 评论(0) 推荐(0)
摘要: 如果N是合数,则必有一个小于或者等于根号N的素因子. 因为任何合数都可表示为两个或者更多个素数之积. 假如N是合数且其素因子都大于根号N,那么将产生矛盾:根号N*根号N>N.所以合数必有(至少)一个不大于根号N的素因子 阅读全文
posted @ 2017-11-24 13:29 R4mble 阅读(171) 评论(0) 推荐(0)
摘要: 用java来跑一跑: 经过我拙劣的比较,对数级比线性还是要好很多的. 阅读全文
posted @ 2017-11-24 12:01 R4mble 阅读(205) 评论(0) 推荐(0)
摘要: (define (double a) (+ a a)) (define (halve a) (/ a 2)) (define (mult a b) (mult-iter a b 0)) (define (mult-iter a b product) (cond ((= b 0) product) ((even? b) (mult-iter (double a... 阅读全文
posted @ 2017-11-24 11:39 R4mble 阅读(132) 评论(0) 推荐(0)
摘要: (define (double x) (+ x x)) (define (halve x) (/ x 2)) (define (mult a b) (cond ((= b 0) 0) ((even? b) (double (mult a (halve b)))) ((odd? b) (+ a (mult a (- b 1)))))) (mult ... 阅读全文
posted @ 2017-11-24 11:33 R4mble 阅读(134) 评论(0) 推荐(0)