Дано натуральное число T - длительность прошедшего времени в секундах. Вывести данное значение длительности в часах, минутах и секундах в следующей форме: НН ч ММ мин SS с. (паскаль)

Question

Зоря

17 сентября, 10:25

+3

Ответы (1)

Знаете ответ на вопрос?

Вениамин · Answer 1

Var

A:integer;

Begin

WriteLn ('Введите кол-во секунд') ;

ReadLn (A) ;

WriteLn (A div 3600,' ч ', A mod 60,' мин ', A mod 60,' сек')

End.