![[填空题] 斐波那契(Fibonacci)数列的构成规律是：数列的第1、2个数是1，从第3个数起，每个数是其前面两个数之和。据此，下面有求斐波那契前12项值的过程，请完善程序。 Sub Fibona](http://www.mshxw.com/aiimages/31/261160.png "[填空题] 斐波那契(Fibonacci)数列的构成规律是：数列的第1、2个数是1，从第3个数起，每个数是其前面两个数之和。据此，下面有求斐波那契前12项值的过程，请完善程序。 Sub Fibona")
[填空题] 斐波那契(Fibonacci)数列的构成规律是：数列的第1、2个数是1，从第3个数起，每个数是其前面两个数之和。据此，下面有求斐波那契前12项值的过程，请完善程序。
Sub Fibonacci(N As Integer，s1)
s1=0
f1=1
【11】
For i=1 To N/2
Print f1；f2；
s1=f1+f2
f1=f1+f2
f2= 【12】
Next i
Print
End Sub
Private Sub Command1_Click()
Dim sum As Integer
Call Fibonacci(12，sum)
Print "Sum="；sum
End Sub
参考答案：
[11]f2=1 [12]f1+f2解析：[分析]： 根据“数列的第1、2个数是1”的题意，填空【11】应是f2=1根据“从第3个数起，每个数是其前面两个数之和”的题意，填空【12】应是f1+f2。问题解析:
解析无
