Program qq;
uses crt;
var c,h,m:real;
begin
write(Введите количество секунд );
read(c);
m:=c/60;
h:=c/3600;
writeln(В ,c, секундах ,m, минут);
writeln(В ,c, секундах ,h, часов);
end.
Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.