[填空题] 斐波那契(Fibonacci)数列的构成规律是:数列的第一、第二个数是1,从第三个数起,每个数是其前面两个数之和。据此,下面有求斐波那契前12项值的过程,请完善程序。
Private Sub Command1_Click()
Dim sum As Integer
Call Fibonacci(12,sum)
Print"Sum=";sum
End Sub
Sub Fibonacci(N As Integer, s1)
s1=0
f1=1
(10)
For i=1 To N/2
Print f1:f2:
s1=f1+f2
f1=f1+f2
f2= (11)
Next i
End Sub
正确答案:f1+f2
参考解析:根据"数列的第一、第二个数是1的题意,[10]应是f2=1;根据"从第三个数起,每个数是其前面两个数之和"的题意,[11]应是f1+f2。
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)