На каком расстоянии друг от друга окажутся отец и сын через два и через три часа пути? - Pascal

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

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

Решение задачи: «На каком расстоянии друг от друга окажутся отец и сын через два и через три часа пути?»

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

var v,s2,s3:real;
begin
repeat
write('Введите скорость 0<v<6 v=');
readln(v);
until(v>0)and(v<6);
s2:=4*v;
s3:=6*v;
write('Расстояние будет через 2 часа ',s2:0:2,' через 3 часа ',s3:0:2);
end.

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

Переменная v используется для хранения скорости движения.
Переменная s2 используется для хранения расстояния через 2 часа.
Переменная s3 используется для хранения расстояния через 3 часа.
Ввод данных начинается с момента запуска программы.
Пользователю предлагается ввести значение переменной v.
Ввод продолжается до тех пор, пока не будет введено значение, удовлетворяющее условию 0<v<6.
Значение переменной v умножается на 4 для вычисления расстояния через 2 часа.
Значение переменной v умножается на 6 для вычисления расстояния через 3 часа.
Выводится сообщение с расстоянием через 2 часа.
Выводится сообщение с расстоянием через 3 часа.