Ввести число обозначающее количество секунд. Вывести то же самое время в часах, минутах, секундах. Пример: Число секунд: 8325 2 ч. 18 мин. 45 с
Питон
Program program1; var a,b:integer; begin writeln('Введите кол-во секунд: '); read(a); b:=a div 3600; write (a, ' Секунд, это ', b, ' часов.') end.