题目内容:
已知Fibonacci数列:1,1,2,3,5,8…,即F1=1 (n=1)
F2=1 (n=2)
Fn=Fn-1+Fn-2 (n≧B.
下列程序的功能是:用数组来求Fibonacci数列的前20项,且以每行5项的格式将这20项打印出来。请在空白处填上适当的内容,将程序补充完整。
Option Base 1
Private Sub Form_Click()
Dim f(20)As Integer
f(1)=1
f(2)=1
For i=3T0 20
____
Next i
For i=1 T0 20
Print f(i);
If(1 Mod 5)=0 Then
End If
Next i
End Sub
参考答案:
答案解析: