一个字急!!
1+1/2+2/3+3/5+5/8
用VB计前20项的和。
参考答案:分析:分子为a,分母为b.
则每一项为a/b.代码为:
a=1
b=1
s=0
for i=1 to 20
s=s+a/b
t=a
a=b
b=t+a
next i
print s
如果是要计前N项和的话就是这样.
a=1
b=1
s=0
N=text1.text
for i=1 to N
s=s+a/b
t=a
a=b
b=t+a
next i
print s
1+1/2+2/3+3/5+5/8
用VB计前20项的和。
参考答案:分析:分子为a,分母为b.
则每一项为a/b.代码为:
a=1
b=1
s=0
for i=1 to 20
s=s+a/b
t=a
a=b
b=t+a
next i
print s
如果是要计前N项和的话就是这样.
a=1
b=1
s=0
N=text1.text
for i=1 to N
s=s+a/b
t=a
a=b
b=t+a
next i
print s