Question

Марафонец прошел S километров со скоростью V метров в секунду (расстояние и скорость вводятся с клавиатуры). Определить, сколько времени он был в пути (часов, минут, секунд)?(язык Pascal)

Answer 1

begin
var s,v,t,t1,t2:real;
writeln('Введите пройденный путь: ');
readln(s);
writeln('Введите скорость человека: ');
readln(v);
t:=v/s;
t1:=(v/s)*60;
t2:=(v/s)*3600;
write('Время ходьбы:  ','.В часах  ',round(t),'.В минутах ',round(t1),'.В секундах',round(t2));
end.