Решите задачу с помощью Паскаля,пожалуйста.

Найдите расстояние,которое проедет авто за заданный период времени(t),если его начальная скорость (v0) и ускорение (а)

program task;
var
  v0, t, a: real;
begin
  writeln('Введите v0, t и a соответственно:');
  readln(v0, t, a);
  writeln('S = ', v0 * t + a * t * t / 2)
end.

// PascalABC.NET 3.3, сборка 1611 от 06.01.2018
// Внимание! Если программа не работает, обновите версию!

begin
var (t,v0,a):= ReadInteger3('t,v0,a =');
Writeln('S = ',v0*t + (a*t*t)/2);
end.

Пример:
t,v0,a = 10 0 1
S = 50