利用函数计算斐波那契数列(1，1，2，3，5，8，13，。) 前40项.要求用递归和非递 递归int fun(int n){if(n=1|n=2)return 1；else return fun(n-1)+fun(n-2)；}非递归int fun(){int ans[41]；ans[0]=ans[1]=1；for(int i=2；i
用VB编程，求Fibonacci数列的前40个数以及它们的和. Option ExplicitDim f(40)As LongPrivate Sub Command1_Click()Dim i As ByteDim s As Longf(1)=1f(2)=1s=2Print\"No1：\"&f(1)Print\"No2：\"&f(2)For i=3 To 40f(i)=f(i-1)+f(i-2)s=s+f(i)Print\"No\"&i&\"：\"&f(i)NextPrint\"总和：\"&sEnd Sub
用递归算法求斐波那契数列（1、1、2、3、5、8……）的第n个数的主要代码 int fib(int n){if(n=1|n=0)return 1；elsereturn fib(n-1)+fib(n-2)；}
