Question

СРОЧНО!
Нужно написать в PascalABC программу на нахождение времени, потраченного на поездку из Москвы в Санкт-Петербург на: поезде, велосипеде и самолёте. (Находить точную скорость каждого не обязательно)

Answer 1

// PascalABC.NET 3.4.2, сборка 1814 от 02.10.2018

// Внимание! Если программа не работает, обновите версию!

begin

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

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

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

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

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

end.