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

beginvar 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.