Fibonacci函數定義如下:  (define?(fib?n)
??(cond?((=?n?0)?0)
????????((=?n?1)?1)
????????(else?(+?(fib?(-?n?1))
?????????????????(fib?(-?n?2))))))
遞歸數如下:
Fib( n)非常接近  n/  5 同樣下面的式子也成立:  同樣使用線性迭代效率要高的多: (define?(fib?n)
??(fib-iter?1?0?n))
(define?(fib-iter?a?b?count)
??(if?(=?count?0)
??????b
??????(fib-iter?(+?a?b)?a?(-?count?1))))
|