pascal 用遞迴函式求斐波那契數列的第n項

時間 2022-02-03 01:30:12

1樓:09計算機

program fibo;

var n,i:integer;

rs:extended;

function fib(m:integer):extended;

var a,b:extended;

begin

a:=1;b:=1;

if m<=2 then exit(1)

else while m>3 do beginfib:=a+b;

a:=b;

b:=fib;

m:=m-1;end;

exit(fib);

end;

begin

read(n);

writeln(fib(n));

end.

2樓:匿名使用者

var f:array[0..1000] of longint; i,k,j,t,ans:

longint;begin readln(n); f[0]:0; f[1]:=1; for i:

=2 to n do begin f[i]:=f[i-1]+f[i-2]; end; writeln(f[n]);end.

3樓:匿名使用者

function fibonacci(n:integer):integerbegin if (n=0) then result:

=0; if (n=1) then result:=1; if (n>1) then result:=fibonacci(n-1)+fibonacci(n-2);end;

斐波那契數列規律,斐波那契數列有啥規律?

李愷怡 後一個數是前兩個數的和。繁分數分母總是大於1,所以的值總是小於1而分子總是取先前的分母,除了第一次分子分母均是1時,值等於1 2,後來的值均大於1 2 而每次計算繁分數時,繁分數分母中的分母總是不變,分子總是先前分子與分母之和 這就完全符合斐波那契數列的規律 那麼這個最簡單的無窮連分數的值是...

斐波那契數列有什麼規律,斐波那契數列規律是什麼?

斐波那契數列規律是什麼?斐波那契數列 這個數列從第3項開始,每一項都等於前兩項之和。在數學上,斐波那契數列以如下被以遞推的方法定義 f 0 0,f 1 1,f n f n 1 f n 2 n 2,n n 應用 斐波那契數列中的斐波那契數會經常出現在我們的眼前 比如松果。鳳梨 樹葉的排列 某些花朵的花...

斐波那契數列通項公式的證明,斐波那契數列通項公式是怎樣推導出來的

菲波那契數列指的是這樣乙個數列 1,1,2,3,5,8,13,21 這個數列從第三項開始,每一項都等於前兩項之和 它的通項公式為 1 5 2 n 5 1 5 2 n 5 5表示根號5 很有趣的是 這樣乙個完全是自然數的數列,通項公式居然是用無理數來表達的。該數列有很多奇妙的屬性 比如 隨著數列項數的...