自定义函数 求 斐波那契数列 （利用2个函数实现）23号之前急要！
自定义函数求斐波那契数列前N项和（利用2个函数实现）

斐波那契数列如下：1 1 2 3 5 8 13 21 34......

Function F(n:integer):integer;//求第N项的值
Function Sum(n:integer):integer;//求和

谢谢高手了！

[解决办法]
Function F(n:integer):integer;
begin
if n=1 or n=2 then F=1
else
F=F(n-1)+F(n-2);
end;
Function Sum(n:integer):integer;
var i,n:integer;
begin
n:=0;
for i=1 to n do n:=n+F(i);
Sum:=n;
end;