3dm游戏运行库百度云:pascal编程:

来源:百度文库 编辑:神马品牌网 时间:2024/04/29 06:51:58
输入匀速运动的初速度 ,加速度 和时间 。输出 时间后的速度 , 时间内走过的路程 和平均速度 。所有输出数据保留小数点后两位。

{直接打的 没用pascal IDE 语法可能编译不过}
var
s,v0,v,a,t:real;
begin
readln(v0,a,t);
v:=v0+a*t;
s:=v0*t+a*t*t/2;
writeln(v:0:2,' ',s:0:2,' ',s/v:0:2);
end.

输入什么呢?

program Noname16;
var t,v,a:real;
begin
readln (v,a,t);{读入初速度、加速度、时间}
writeln ('Vt=',v+a*t:0:2);{t时刻的速度}
writeln ('S=',v*t+0.5*a*t*t:0:2);{路程}
writeln ('V=',v+0.5*a*t:0:2);{平均速度}
Readln;
end.