Mo
6 год назад
Дано натуральное число T- длительность прошедшего времени в секундах. Вывести данное значение длительности в часах, минутах и секундах в следующей форме: НН ч ММ мин SS с. ( паскаль )
ОТВЕТЫ
Иосиф
Oct 24, 2020
Var
A:integer;
Begin
WriteLn('Введите кол-во секунд');
ReadLn(A);
WriteLn(A div 3600,' ч ',A mod 60,' мин ',A mod 60,' сек')
End.
A:integer;
Begin
WriteLn('Введите кол-во секунд');
ReadLn(A);
WriteLn(A div 3600,' ч ',A mod 60,' мин ',A mod 60,' сек')
End.
740
Смежные вопросы:
