你想用什么语言搞程序设计？
以delphi为例：（其它相似）
procedure TForm1.Button1Click(Sender: TObject);
var
i,s:integer;
begin
i:=1;
s:=0;
repeat
s := s +i;
i := i+2;
until s>2000;
label1.Caption :='i = '+inttostr(i);
end;
当i=89 时，就s>2000了。
vb.net
Dim s,i As Integer
i = 1
While s <= 2000
s += i
i += 2
End While
for(i=0,sum=0;sum<=2000;i++)
sum+=i;
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024