Нужно написать в pascalabc программу на нахождение времени, потраченного на поездку из москвы в санкт-петербург на: поезде, велосипеде и самолёте. (находить точную скорость каждого не обязательно)

begin

 var s := ReadReal('Расстояние в километрах:');

 var (t, v, p) := ReadReal3('Скорости поезда, велосипеда, самолета, км/ч:');

 Println('Время в часах');

 Writeln('Поезд ', s / t:0:2, ', велосипед ', s / v:0:2,

     ', самолет ', s / p:0:2)

end.