vb求s=2+4+…+n当s<4000最大的n是多少
答案:1 悬赏:70
解决时间 2021-02-27 05:48
- 提问者网友：留有余香
- 2021-02-26 08:36
vb求s=2+4+…+n当s<4000最大的n是多少
最佳答案
- 二级知识专家网友：空山清雨
- 2021-02-26 08:50
Private Sub Command1_Click()
Dim n As Integer
Dim s As Integer
Do While s + n < 4000
n = n + 2
s = s + n
Loop
MsgBox "n=" & n
End Sub
Dim n As Integer
Dim s As Integer
Do While s + n < 4000
n = n + 2
s = s + n
Loop
MsgBox "n=" & n
End Sub
我要举报
如以上问答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯