s=1+1/2+2/3+3/5+5/8+.....用VB编程,输出前20项的和从键盘输入

后一项的分子是前一项的分母,后一项的分母是前一项的分子、分母的和

代码如下:
n=inputbox("输入n的值")
s=0
a=1
b=1
for i=1 to n
s=s+a/b
b=a+b
a=b-a
next i
print s
温馨提示:答案为网友推荐,仅供参考
相似回答