斐波那契(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 Print End Sub