这个VB程序怎么编写?

来源：百度知道 编辑：UC知道 时间：2024/05/14 01:08:35
使用数组，求出下列数列的第20项：1,1,2,4,7,13,......
要具体的程序哦,告诉我这个数列的特点也可以

从第四项起，后一项等于前面三项的和：

4＝1＋1＋2；
7＝1＋2＋4；
13＝2＋4＋7；

定义数组即可解决：

dim a[20];

a[1]=1;
a[2]=1;
a[3]=2;

for( i=4 to 20)
a[i]=a[i-1]+a[i-2]+a[i-3]
next i

print a[i]

列举太少，还看不出规律

规律是 A（n+3)=A（n+2)＋A（n+1)+A（n) N.>=0
即从第四项开始，后一项是前三项的和

这都不会，那你也够笨