VB编程 累加器的问题 已知S=1+2+3·······+N，找出一个最大的整数N，使得S<30000,编程解决。
答案:4 悬赏:70
解决时间 2021-01-16 20:37
- 提问者网友：练爱
- 2021-01-16 15:39
VB编程 累加器的问题 已知S=1+2+3·······+N，找出一个最大的整数N，使得S<30000,编程解决。
最佳答案
- 二级知识专家网友：青灯有味
- 2021-01-16 16:00
dim s as long,n as integer
For n=1 to 30000
if s +n >=30000 Then Exit For
s=s+n
Next
Msgbox "最大数是" & n
For n=1 to 30000
if s +n >=30000 Then Exit For
s=s+n
Next
Msgbox "最大数是" & n
全部回答
- 1楼网友：污到你湿
- 2021-01-16 19:05
n^2+n<60000
求deta算呗
求deta算呗
- 2楼网友：独钓一江月
- 2021-01-16 18:04
dim i as long,
dim s as long,
dim N as long
do while (i>=1 and i<=N)
s=0
s=s+i
i=i+1
next j
loop
do while (s<30000)
print N
loop
dim s as long,
dim N as long
do while (i>=1 and i<=N)
s=0
s=s+i
i=i+1
next j
loop
do while (s<30000)
print N
loop
- 3楼网友：躲不过心动
- 2021-01-16 16:59
Private Sub Command1_Click()
Do
n = n + 1
s = s + n
Loop until s>=30000
Print n - 1
End Sub
Do
n = n + 1
s = s + n
Loop until s>=30000
Print n - 1
End Sub
我要举报
如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
点此我要举报以上问答信息！
大家都在看
推荐信息