誰(shuí)會(huì)算斐波那契數(shù)列

patagonia2

求斐波那契數(shù)列最快算法

大家可以求Fibonacci的第100項(xiàng)試試，
感受一下這樣遞歸會(huì)慢到什么程度。
在我的機(jī)器上，
運(yùn)行了1個(gè)多小時(shí)也沒有結(jié)果。

1. %-module(fibonacci).
   
2. -mode(native).
   
3. -define (PP (V), io:format ("~s = ~p~n", [??V, V])).
   
4. 
   
5. fibonacci (0) -> 0;
   
6. fibonacci (1) -> 1;
   
7. fibonacci (N) -> fibonacci (N - 1) + fibonacci (N - 2).
   
8. 
   
9. main(_) ->
   
10.     F = fibonacci (100),
    
11.     ?PP (F),
    
12. halt().
    

復(fù)制代碼

求大圣的高效寫法。

patagonia2

ER 是一門被設(shè)計(jì)用于編寫并發(fā)、實(shí)時(shí)、分布式系統(tǒng)的新語(yǔ)言。
如何并發(fā)? 求斐波那契數(shù)列 ?

patagonia2

覺得很不錯(cuò) fly
哪一個(gè)比較好？

1. %-module(fibonacci).
   
2. -define (PP (V, N), io:format ("~s ~p = ~p~n", [??V, N, V])).
   
3. 
   
4. fibonacci (A) when A < 2 -> A;
   
5. fibonacci (A) -> fibonacci (2, A + 1, 0, 1).
   
6. fibonacci (A, A, _, B) -> B;
   
7. fibonacci (A0, A, B, C) -> fibonacci (A0 + 1, A, C, B + C).
   
8. 
   
9. main(_) ->
   
10.     N = 100,
    
11.     Fib = fibonacci (N),
    
12.     ?PP (Fib, N),
    
13. halt().
    

復(fù)制代碼