用递归的方法编写函数求斐波那契数列第N项fab(n)={0,1,1,3,5,8,13.......}

Question

分析：斐波那契数列具有这样的特点，数列的前俩项都是1，从第三项起，每项数值等于前俩项之和

Answer 1

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 begin
fib:=a+b;a:=b;b:=fib;m:=m-1;end;exit(fib);end;
begin
read(n);writeln(fib(n));end.本回答被网友采纳

Answer 2

百度上的页面上有~ #include