16,748
社区成员
发帖
与我相关
我的任务
分享
var
I:Integer;
Tot:Integer;
begin
I:=0;
Tot:=0;
for i:=0 to 10 do
begin
Tot:=Tot+i
end;
showMessage(IntToStr(i));
end;
var
I:Integer;
Tot:Integer;
begin
Tot:=0;
for i:=0 to 10 do
begin
Tot:=Tot+i;
showMessage(IntToStr(i));
end;
end;