Составь программу pascal вычисления пройденного пути

Привет! Вот пример программы на языке Pascal для вычисления пройденного пути:

program ProidennoeRasstoyanie; var v, t, s: real; begin write('Введите скорость (в км/ч): '); readln(v); write('Введите время (в часах): '); readln(t);

s := v * t;

writeln('Пройденное расстояние: ', s:0:2, ' км'); end.