13 lines
163 B
Text
13 lines
163 B
Text
|
fibi is op n {
|
||
|
|
if n<2 then
|
||
|
|
n
|
||
|
|
else
|
||
|
|
x1:=0; x2:=1;
|
||
|
|
for i with tell (n - 1) do
|
||
|
|
x:=x1+x2;
|
||
|
|
x1:=x2;
|
||
|
|
x2:=x;
|
||
|
|
endfor;
|
||
|
|
x2
|
||
|
|
endif};
|