delphi 语法，帮我看看错在哪里
procedureTForm1.Button1Click(Sender:TObject);varx,y,s:integer;beginx:=strtoint(edit1....
procedure TForm1.Button1Click(Sender: TObject);
var
x,y,s:integer;
begin
x:=strtoint(edit1.Text);
y:=strtoint(edit2.Text);
s:=0
while x<=y do
begin
s:=s+x;
x:=x+1;
end;
edit3.Text:=inttostr(s);
end;
end.//它提示while那里出错，我不知哪里错了～ 展开
var
x,y,s:integer;
begin
x:=strtoint(edit1.Text);
y:=strtoint(edit2.Text);
s:=0
while x<=y do
begin
s:=s+x;
x:=x+1;
end;
edit3.Text:=inttostr(s);
end;
end.//它提示while那里出错，我不知哪里错了～ 展开
1个回答
展开全部
s:=0
后少了;号
后少了;号
本回答由提问者推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
希奕际
2024-04-10 广告
剑桥文理与剑桥艺术学校中国 基于剑桥文理学校优质的海外校本部资源和课程方向，现开设四类课程：艺术与设计课程、音乐与戏剧课程、英国A-Level课程、波士顿文理中学美高与AP课程。荣获2021胡润百学中国国际学校艺术类领军学校奖，2022胡润...
点击进入详情页
本回答由希奕际提供
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
