求助vb编程题一道 计算S=1+ 1/2 + 1/4 + 1/7 + 1/11 + 1/16 + 1/22 + 1/29 + …,当第i项的值

来源:学生作业学帮网 编辑:学帮网 时间:2024/05/31 19:54:52

求助vb编程题一道 计算S=1+ 1/2 + 1/4 + 1/7 + 1/11 + 1/16 + 1/22 + 1/29 + …,当第i项的值

dim s,a,i
s=1
a=1
i=0
Do While a