码迷,mamicode.com
首页 > 其他好文 > 详细

SICP 1.19

时间:2014-07-26 17:26:42      阅读:713      评论:0      收藏:0      [点我收藏+]

标签:style   ar   时间   python   size   程序   a   ef   

解:这道题很有意思,结论是斐波那契数也可以用对数时间复杂度获得。

通过Tpq(Tpq)=TPQ建立方程,解得:

P=pp+qq

Q=qq+2pq

程序如下:

(define (fib n)
  (define (even? n)
    (= (remainder n 2) 0))
  (define (fib-iter a b p q count)
    (cond ((= count 0) b)
          ((even? count) (fib-iter a
                                   b
                                   (+ (* p p) (* q q))
                                   (+ (* q q) (* 2 p q))
                                   (/ count 2)))
          (else (fib-iter (+ (* b q) (* a q) (* a p))
                          (+ (* b p) (* a q))
                          p
                          q
                          (- count 1)))))
  (fib-iter 1 0 0 1 n))


SICP 1.19,布布扣,bubuko.com

SICP 1.19

标签:style   ar   时间   python   size   程序   a   ef   

原文地址:http://my.oschina.net/u/1445655/blog/295101

(0)
(0)
   
举报
评论 一句话评论(0
登录后才能评论!
© 2014 mamicode.com 版权所有  联系我们:gaon5@hotmail.com
迷上了代码!