填空题

斐波那契(Fibonacci)数列的构成规律是:数列的第一、二个数是1,从第三个数起,每个数是其前面两个数之和。据此,下面有求斐波那契前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 sun As Integer
Call Fibonacci(12,sun)
Print "Sun=";Sun
End Sub

【参考答案】

f1+f2
热门 试题

填空题
Hide
填空题
B