作业帮 > 综合 > 作业

已知一个数列的前3个数1,2,3,以后的每个数为前3个数的和,编程序求此数列的第35项,请用VB来解

来源:学生作业帮 编辑:神马作文网作业帮 分类:综合作业 时间:2024/11/18 19:24:56
已知一个数列的前3个数1,2,3,以后的每个数为前3个数的和,编程序求此数列的第35项,请用VB来解
已知一个数列的前3个数1,2,3,以后的每个数为前3个数的和,编程序求此数列的第35项,请用VB来解
Private Function GetNum(ByVal iCount As Long)
Dim i As Long
ReDim a(iCount) As Long
a(1) = 1:a(2) = 2:a(3) = 3
For i = 4 To iCount
a(i) = a(i - 3) + a(i - 2) + a(i - 1)
Next
GetNum = a(iCount)
End Function
调用 GetNum(35) 即所求的第35项