作业帮 > 综合 > 作业

给出这样一个数列:1 1 2 3 5 8 13 21 34 55 89...问这个数列的第n项是什么 用pascal做

来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/10/03 08:09:53
给出这样一个数列:1 1 2 3 5 8 13 21 34 55 89...问这个数列的第n项是什么 用pascal做
var f:array[1..100]of longint;
n,i:longint;
begin
readln(n);
f[1]:=1;
f[2]:=1;
for i:=3 to n do
f[i]:=f[i-1]+f[i-2];
writeln(f[n]);
end.