Question

составить программу в Free pascal для нахождения пройденного пути по этой формуле. программа должна содержать описание используемых переменных (var), очистку экрана (uses) (crt) и оператор clr scr ; ввод и вывод величин в отдельной строке.

Answer 1

uses Crt;
var
  v,t,a:real;
begin
  ClrScr;
  Write('Введите v,a,t: ');
  Read(v,a,t);
  Writeln('S=',v*t+a*t*t/2);
  ReadKey
end.