已知s=1+2+3+。。。+n找出一个最大整数N使得是《30000 这用VB怎么写

Question

望各位大侠帮帮忙，小弟我下午就要会考了

Answer 1

用do while....loop循环累加，直到满足小于30000时停止，然后将N的值输出

Answer 2

这个没有什么的了吧Dim i As Integer
i = 1Dim cun As Integer
cun = 0

DoIf cun > 3000 Then
Exit Do
Else
cun = cun + i
i = i + 1
End If
Loop
MsgBox Str(i)
End Sub本回答被网友采纳

Answer 3

int count=0;
int i ;
for (i= 1; count < 30000; i++)
{
count += i;
}
MessageBox.Show(i.ToString());