一道VB编程题,各位帮忙看看啦!!

来源:百度知道 编辑:UC知道 时间:2024/06/15 03:12:26
编制事件过程Command1_Click,按照下式计算并输出f1、f2、...、f36的值。
1 i=1,2
f(i)=
f(i-1)+f(i-2) i>2
由于没到2级,所以只能这样写了,上面是一个方程组,各位帮忙看看,谢谢啊!!!

Private Sub Command1_Click()
Dim i As Integer, f(1 To 36) As Long
For i = 1 To 36
If i = 1 Or i = 2 Then
f(i) = 1
Else
f(i) = f(i - 1) + f(i - 2)
End If
Print "f(" & i & ")=" & f(i)
Next
End Sub

编制事件过程Command1_Click,按照下式计算并输出f1、f2、...、f36的值。
1 i=1,2
f(i)=
f(i-1)+f(i-2) i>2
由于没到2级,所以只能这样写了,上面是一个方程组,各位帮忙看看,谢谢啊!!!