tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Дано натуральное число t- длительность
Дано натуральное число t- длительность времени в секундах. вывести данное значение длительности в часах, минутах и секундах в следующей форме: нн ч мм мин ss с. ( паскаль )
CleverBoy17
1 24.08.2019 22:40
5
Ответы
хрустально
05.10.2020 17:32
Var
A:integer;
Begin
WriteLn('Введите кол-во секунд');
ReadLn(A);
WriteLn(A div 3600,' ч ',A mod 60,' мин ',A mod 60,' сек')
End.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
whiteandblackca
30.05.2019 11:10
1. переведите в байты: 1024 бита = 2. переведите в биты: 10 байтов = 1,5 кб = 3. переведите в килобайты: 2048000 бит = 4. заполните пропуски числами: =1536 мбайт = 5. определите...
doreta
30.05.2019 11:10
Надо система команд исполнителя вычислителя состоит из двух команд: 1-прибавить 2; 2-умножить на 3; составьте для вычислителя содержащего не более 6 команд алгоритм получение...
AbiloWa
30.05.2019 11:20
Дан целочисленный массив a(n). найти наибольшее из нечетных и количество четных чисел, входящих в последовательность a[n], a[n]+1....
steelersumyp06wkp
13.06.2019 19:20
Слова с жч и нщ и словосочетания с ними...
nastua89723
13.06.2019 19:20
Внимание! внимание! обратите внимание! у андрея на жестком диске компьютера есть игра tetris. у его друга коли такой игры нет. что нужно сделать андрею, чтобы коля смог на своем...
musukaev699
13.06.2019 19:10
Как из 16-ричной системы счисления перевести в 10-тичную и 8 ричную? число: 4a98,bc2 заранее...
Red4521
11.12.2020 17:16
Вопрос Отметьте в списке операционные системы для настольных компьютеров.Укажите один или несколько правильных вариантов ответа:1. macos2. Windows3. Android4. Linux5. iOS...
alina0901200432
11.12.2020 17:16
Найдите сокращение формулы = B1 + B2 + B3 + B4 + B5 по функции....
ksussshhhaaa
11.12.2020 17:17
Задание на 5 секунд Не понял что надо вписать в правой нижней ячейке...
АпаснаяЯ
11.12.2020 17:19
Что означает многофакторная ауентификация? 1.ауентификация с нескольких ролей.2.ауентификация с подтверждением от третьей стороны.3.ауентификация с пароля и второго фактора.4.ауентификация...
Популярные вопросы
1)с какой целью европейскими монархами был создан священный союз? а) подавление...
1
Основание равнобедренного треугольника в 2 раза меньше боковой стороны. найдите...
3
Укажите грамматически правильное продолжение предложения. слушая доклад директора,...
3
Разберите -заснувшими под цифрой 2 (синтаксический разбор)...
3
Илья и кирилл поймали 24 пескаря. сколько пескарей поймал каждый из , если...
3
Вычислить 21ч17мин-12ч45мин,9ч16мин+8ч57мин,7мин12с-5мин16с, 11л4мес-6л6мес...
3
Объясните что такое логарифмы . я четвероклассник но мне просто интересно....
3
Рабочий должен был изготовить за день 63детали.через 2ч работы ему осталось...
2
Высота аквариума 2 дм, а водой он наполнен до высоты 15 см.сколько литров воды...
2
1ч.17мин-66мин переведите в минуты и вычислите (решение запишите в часах и...
3
A:integer;
Begin
WriteLn('Введите кол-во секунд');
ReadLn(A);
WriteLn(A div 3600,' ч ',A mod 60,' мин ',A mod 60,' сек')
End.