早教吧作业答案频道 -->其他-->
pascal递归的方法做问题1、用递归的方法求1+2+3+……+N的值。2、用递归函数输出斐波那契数列第n项。0,1,1,2,3,5,8,13……3、输入一个非负整数,递归方法输出这个数的倒序数。例如输
题目详情
pascal 递归的方法做问题
1、用递归的方法求1+2+3+……+N的值。
2、用递归函数输出斐波那契数列第n项。0,1,1,2,3,5,8,13……
3、输入一个非负整数,递归方法输出这个数的倒序数。例如输入123,输出321。
4、用递归算法将数组A中的N个数倒序输出。
5、用递归方法求N个数中的最大数及其位置。
6、用递归算法将一个十进制数X转换成任意进制数M(M<=16)。
其中第3个 第6个 较为重要 其他可以省略……
1、用递归的方法求1+2+3+……+N的值。
2、用递归函数输出斐波那契数列第n项。0,1,1,2,3,5,8,13……
3、输入一个非负整数,递归方法输出这个数的倒序数。例如输入123,输出321。
4、用递归算法将数组A中的N个数倒序输出。
5、用递归方法求N个数中的最大数及其位置。
6、用递归算法将一个十进制数X转换成任意进制数M(M<=16)。
其中第3个 第6个 较为重要 其他可以省略……
▼优质解答
答案和解析
我直接写出最重要的把,只写子程序好了。
3:
procedure f(x,s:longint);
begin
if x=0 then begin writeln(s);exit;end;
f(x div 10,s*10+x mod 10);
end;
主程序中: f(x,0);(x是要颠倒的数);
6:
procedure f(x,s,t:longint);
begin
if t=0 then begin writeln(s);exit;end;(我直接用颠倒数字,为了防止最后的零不输出,我就设定了位数)
f(x div 10,s*10+x mod 10,t-1);
end;
procedure f1(x,s:longint);
var
t:longint;
begin
if x=0 then begin f(s,0,t);end;
t:=t+1;
f(x div m,s*10+(x mod m));
end;
主程序中:readln(m);(进制);f1(x,0);(x是要换进制的数);
如果用数组的话可以更好一点,我这样直接
3:
procedure f(x,s:longint);
begin
if x=0 then begin writeln(s);exit;end;
f(x div 10,s*10+x mod 10);
end;
主程序中: f(x,0);(x是要颠倒的数);
6:
procedure f(x,s,t:longint);
begin
if t=0 then begin writeln(s);exit;end;(我直接用颠倒数字,为了防止最后的零不输出,我就设定了位数)
f(x div 10,s*10+x mod 10,t-1);
end;
procedure f1(x,s:longint);
var
t:longint;
begin
if x=0 then begin f(s,0,t);end;
t:=t+1;
f(x div m,s*10+(x mod m));
end;
主程序中:readln(m);(进制);f1(x,0);(x是要换进制的数);
如果用数组的话可以更好一点,我这样直接
看了 pascal递归的方法做问题...的网友还看了以下:
求三角函数的最大值函数f(θ)=sinθ*L/cosθ-g*L^2/(2*(cosθ)^2*V^2) 2020-03-30 …
一道高电压技术的计算题..如图,已知U0=1000kV,Z1=450Ω,Z2=30Ω.(1)求直角波 2020-03-30 …
如图:在三角形ABC中,AB点乘AC=0,|AB|=8,|AC|=6,L为线段BC的中垂线,L与B 2020-06-02 …
只是有一处有点疑问~已知m∈R,直线l:mx-(m^2+1)y=4m.和圆C:x^2+y^2-8x 2020-06-03 …
已知直线l的方程为y=kx-4,圆方程为x^2+y^2-2x+4y-1=0(1)若直线l过圆心,求 2020-06-12 …
已知A(2,3)B(4,1)两点,直线l:x+3y-2=0:(1)在直线l求一点p已知A(2,3) 2020-07-13 …
已知曲线C:x24+y29=1,直线l:x=2+ty=2-2t(t为参数)(Ⅰ)写出曲线C的参数方 2020-07-17 …
高一数学题圆锥的母线长L,高H,如果过圆锥顶点的截面积的最大值为L的平方的2分之1,则AH/L=根 2020-07-31 …
求动点P到动直线的距离最小值当k在实数集中变化时,求动点p(1,-k^2)到动点l:x-y+k=0的 2020-11-03 …
原子结构原子中每个电子的运动状态由四个量子数n,l,m,ms确定.假设它的取值规则为:n=1,2,3 2020-12-02 …