Program Way;
var s,a,t,v:real;
begin
read (a,t,v);
s:=v*t+a*t*t/2;
writeln ('Пройденный путь равен ', s);
end.
Объяснение:
язык pascal abc
Program Way;
var s,a,t,v:real;
begin
read (a,t,v);
s:=v*t+a*t*t/2;
writeln ('Пройденный путь равен ', s);
end.
Объяснение:
язык pascal abc