vb在线等

显示全部楼层 · 2008-5-30 12:40:38

题目：一个有100个数组成的数列，它的头三个数为0，1，2。第四个数为前三个数之和，第五个数为第二、第三、第四三个数之和，以后每个数皆为前三个数之和，编写程序，在窗体上将这个数列按每行5个打印出来。（提示：可以利用Tab(x)函数进行输出的精确定位）

千问 · 2008-5-30 12:40:38

Dim a(100) As Doublea(0) = 0a(1) = 1a(2) = 2For i = 3 To 99 a(i) = a(i - 3) + a(i - 2) + a(i - 1)NextFor i = 0 To 99 If i Mod 5 = 0 And i > 0 Then
Print
Print Tab((i Mod 5) * 25); a(i); Else
Print Tab((i Mod 5) * 25); a(i); End IfNext