已知一个数列的前三项为345,以后每个数为前三个数之和,vb编程求此数列的第26项

问题描述:

已知一个数列的前三项为345,以后每个数为前三个数之和,vb编程求此数列的第26项
我已经知道答案是7545856

Dim a1,a2,a3,a4,i As Integer
a1=3:a2=4:a3=5
for i=4 to 26
a4=a1+a2+a3
a1=a2
a2=a3
a3=a4
next
输出a4即可