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.第二個條件應...