请教:怎么用vb编写数列,例如:1 ,2 ,4 ,8 ,16, 32, 64...... 要求;先显示数列,然后再求所有数列和
1个回答
展开全部
Private Sub Command1_Click()
n = InputBox("请输入数列项数n：")
For i = 1 To n
t = 2 ^ (i - 1)
s = s + t
Print t;
Next i
Print
Print "数列和为：" & s
End Sub
n = InputBox("请输入数列项数n：")
For i = 1 To n
t = 2 ^ (i - 1)
s = s + t
Print t;
Next i
Print "数列和为：" & s
End Sub
本回答由提问者推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
