中科新闻网诛仙3太虚锦囊怎么升级:请教两道PASCAL语言题！
来源：百度文库 编辑：中科新闻网 时间：2024/05/01 16:36:21
1.试编写求k阶菲波那契数列的第m项值得函数算法。k和m均以值参的形式放在参数表中。
2.编写一个算法，将i！的值存放到数组A[1..m]中，m为某个常量，i为integer类型。要求当i！超过计算机所能表示的范围或i>m时，算法能按出错处理。
请高手们将以上两题用pascal语言编写，将源程序以及第一题中的“k阶菲波那契数列”是什么意思告诉我~谢谢啦！
2.编写一个算法，将i！的值存放到数组A[1..m]中，m为某个常量，i为integer类型。要求当i！超过计算机所能表示的范围或i>m时，算法能按出错处理。
请高手们将以上两题用pascal语言编写，将源程序以及第一题中的“k阶菲波那契数列”是什么意思告诉我~谢谢啦！
k阶。。。数列就是有K项的
原代码：
var n:integer;
function f(n:integer):integer;
begin
if n=1 or n=2 then f:=1
else f(n):=f(n-1)+f(n-2);
end;
begin
readln(n);
writeln(f(n));
readln;
end.
第一个数列就是：
1 1 2 3 5 8 13。。。
就是一个数是前2个数的和
用递归法
k阶菲波那契数列如下定义
f[1]=1
f[2]=1
.....
f[k+1]=1
f[k+2]=f[k+1]+f[k]+...+f[1]
f[i]=f[i-1]+f[i-2]+...+f[i-k-1] i>=k+2