请帮忙写个小程序Delphi学习用的！
已知匀加速运动的初速度为10m/s，加速度为2/s,求20S以后的速度，20S内走过的路程及平均速度！要求用PASCAL语言编写，我是初学者，想必这个对于高手来说相当的简...
已知匀加速运动的初速度为10m/s，加速度为2/s,求20S以后的速度，20S内走过的路程及平均速度！
要求用PASCAL语言编写，
我是初学者，想必这个对于高手来说相当的简单，
因为刚刚学，所以脑子里不怎么清楚，请高人帮写下这个程序让小弟慢慢来学习学习，谢谢了！ 展开
要求用PASCAL语言编写，
我是初学者，想必这个对于高手来说相当的简单，
因为刚刚学，所以脑子里不怎么清楚，请高人帮写下这个程序让小弟慢慢来学习学习，谢谢了！ 展开
2个回答
展开全部
procedure TForm1.Button1Click(Sender: TObject);
var
i:integer;
a,b,tmp:integer;
begin
a:=10;
b:=2;
tmp:=0;
for i:= 1 to 20 do
begin
tmp := tmp + a + b;
end;
showmessage('一共走了：' + inttostr(tmp));
showmessage('平均速度：' + FloatToStr(tmp /20));
end;
var
i:integer;
a,b,tmp:integer;
begin
a:=10;
b:=2;
tmp:=0;
for i:= 1 to 20 do
begin
tmp := tmp + a + b;
end;
showmessage('一共走了：' + inttostr(tmp));
showmessage('平均速度：' + FloatToStr(tmp /20));
end;
本回答由提问者推荐
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
网易云信
2023-12-06 广告
很高兴能回答您的问题。以下是一段针对“一对一消息组件”的描述，字数在200字左右：该组件支持用户之间的私密交流，让沟通更加直接和高效。通过它，您可以向特定对象发送消息，并实时查看消息状态，包括对方是否已读或未读。同时，该组件还支持富文本消息...
点击进入详情页
本回答由网易云信提供
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
