作业帮 > 综合 > 作业

VB编程.输出斐波那契数列1,1,2,3,5,8,13第20个数 使用for...next语句完成程序.并将结果存入变量

来源:学生作业帮 编辑:拍题作业网作业帮 分类:综合作业 时间:2024/04/27 23:21:03
VB编程.输出斐波那契数列1,1,2,3,5,8,13第20个数 使用for...next语句完成程序.并将结果存入变量sum中
Dim fbn(19) As Integer '定义斐波那契数列变量数组,共20个
fbn(0) = 1 '给出前两个值
fbn(1) = 1
For i = 2 To 19
fbn(i) = fbn(i - 2) + fbn(i - 1)
Next i
Print fbn(19)
Sum = fbn(19)
再问: 单击窗体。。没有输出啊???