求pascal遞迴演算法教程,free pascal用遞迴的方法編寫函式求fibonacci級數

時間 2022-02-01 20:10:50

1樓:媛你無限

我也不會。。我學c和c++的。。抱歉

free pascal用遞迴的方法編寫函式求fibonacci級數

2樓:匿名使用者

function fibonacci(n:integer):int64;

begin

if (n=0)or(n=1) then fibonacci:=1else fibonacci:=fibonacci(n-1)+fibonacci(n-2);

end;

begin

writeln(fibonacci(6));

end.

用遞迴的方法求1+2+3+4+……(n-1)+n的值 pascal語言 30

3樓:聽不清啊

var n:integer;

function sum(n:integer);

var i,s:integer;

begin

s:=0;

for i:=1 to do

inc(s,i);

sum:=s;

end;

begin

readln(n);

writeln(sum(n));

end.

【急】pascal遞迴1+2+3+n……求高手解答

4樓:匿名使用者

這道題其實不用遞迴也行的,用迴圈1 to n do就行了,如果用遞迴演算法做的話,參考程式如下:

var n:longint;

function lj(m:longint):longint;

begin

if m=n then lj:=n else lj:=lj(m+1);

end;

begin

read(n);

writeln(lj(1));

end.

5樓:匿名使用者

var n,s:longint;

function sum(x:longint):longint;

begin

if x=1 then exit(1) else exit(sum(x-1)+x);

end;

begin

readln(n);

s:=sum(n);

writeln(s);

end.

6樓:匿名使用者

var n,t:longint;

function fct(n:longint;) : longint;

begin

if n<>1 then fct(n):=fct(n-1)+n else fct(n):=1;

end;

begin

readln(n);

writeln(fct(n));

end.

C 函式遞迴問題,C 用函式遞迴求1 2 到n的問題

const int len 66 const int divs 6 void subdivide char ar,int low,int high,int level int tmain int argc,tchar ar return 0 將陣列ar子分,並在子分構成中不斷在子分的子串中間賦值為 ...

c語言遞迴求階乘,c語言怎麼用遞迴呼叫函式的方法求n的階乘?

問明 舉例 用遞迴方法求n include int main int n int y printf input a integer number scanf d n y fac n printf d d n n,y return 0 int fac int n int f if n 0 printf...

c語言,用遞迴方法求一個整數a的n次方

long long p int a,int n 這就是那個遞迴的函式,主函式自己寫一下吧。c語言 用遞迴方法求x的n次方 兩個錯誤 1.按演算法n小於0時,62616964757a686964616fe59b9ee7ad9431333365656633y 1 fun x,n 1 x 2.第二個條件應...