Вычислить значения пути, пройденного телом за каждую из 12 секунд - Pascal

Формулировка задачи:

Вычислить значения пути, пройденного телом за каждую из 12 секунд. Скорость тела запросить с клавиатуры. Результат представить в виде таблицы.

Решение задачи: «Вычислить значения пути, пройденного телом за каждую из 12 секунд»

Листинг программы

var v:real;
    i:byte;
begin
write('Введите скорость в м/сек v=');
readln(v);
writeln('------------------------');
writeln('| Время, сек.| Путь, м |');
writeln('------------------------');
for i:=1 to 12 do
writeln('|',i:8,'    |',i*v:8:2,' |');
writeln('------------------------');
end.

Объяснение кода листинга программы

Создается переменная v типа real, которая будет использоваться для хранения значения скорости в метрах в секунду.
Создается переменная i типа byte, которая будет использоваться для инкремента счетчика.
Выводится сообщение Введите скорость в м/сек v= для того, чтобы пользователь мог ввести значение скорости.
Выводится строка ------------------------ для разделения данных.
Выводится заголовок | Время, сек.| Путь, м | для разделения данных.
Запускается цикл for, который будет выполняться 12 раз (от i=1 до i=12).
В каждой итерации цикла выводится значение счетчика i и значение скорости v, умноженное на i.
После завершения цикла выводится последняя строка ------------------------.
Конец программы.