问题详情

斐波那契(Fibonacci)数列的构成规律是：数列的第1、2个数是1，从第3个数起，每个数是其前面两个数之和。据此，下面有求斐波那契前12项值的过程，请完善程序。 Sub Fibonacci(N As Integer，s1) s1=0 f1=1 【 】 For i=1 To N/2 Print f1；f2； s1=f1+f2 f1=f1+f2 f2=【 】 Next i Print End Sub Private Sub Command1_Click() Dim sum As Integer Call Fibonacci(12，sum) Print "Sum="；sum End Sub


请帮忙给出正确答案和分析，谢谢！