SICP:1.19快速的求Fib数列
摘要：
#lang racket(define (fib n) (fib-iter 1 0 0 1 n) );fib(define (fib-iter a b p q count) (cond ((= count 0) b);0 ((even? count) (fib-iter a ... 阅读全文
posted @ 2015-03-23 20:50 Zachary_wiz 阅读(191) 评论(0) 推荐(0) 编辑
