12 lines
91 B
Text
12 lines
91 B
Text
fib(n)
|
|
Func
|
|
Local a,b,c,i
|
|
0→a
|
|
1→b
|
|
For i,1,n
|
|
a→c
|
|
b→a
|
|
c+b→b
|
|
EndFor
|
|
a
|
|
EndFunc
|