program SecondsToHoursMinutes;
{$APPTYPE CONSOLE}
uses
SysUtils;
var
k, h, m: Integer;
begin
// Вводим количество секунд
ReadLn(k);
// Вычисляем количество часов и минут
h := k div 3600; // 3600 секунд в часе
m := (k mod 3600) div 60; // Остаток от деления на 3600 даст секунды, а потом делим на 60 для минут
// Выводим результат
WriteLn('Прошло ', h, ' часов и ', m, ' минут.');
ReadLn;
end.