QBasic编程题：有数列8，9，7，6，3后一个数是前两个数的和的一位数，求前100项之和

cls
a=8
b=9
s=0
for I =1 to 100
c=(a+b)mod 10
s=s+c
a=b
b=c
next I
print "前100项之和为";s
end

1楼的写错了！！！
i的初值是3，s的初值是8+9=17。
程序改为：
cls
a=8
b=9
s=17
for I =3 to 100
c=(a+b)mod 10
s=s+c
a=b
b=c
next I
print "前100项之和为";s
end

用数组做啊，附上两条程序:
1.双精度程序
cls
dim a(100)
dim s as double '定义双精度
a(1)=8
a(2)=9
s=17
for i=3 to 100
a(i)=（a(i-2) a(i-1)） mod 10
s=s a(i)
next i
print "前10项之和为";s
end
2.高精度程序
cls
INPUT n
y = 100
DIM c(y + 1)
a = 8
b = 9
c(1) = 7
c(2) = 1
FOR i = 3 TO n
c = (a + b) MOD 10
a = b
b = c
p = c
j = 0
DO ‘高精度运算
j = j + 1
r = p MOD 10