Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
fatimamuradaaa
13.08.2021 14:58 •
Информатика
Дано количество секунд сначала суток. вычислить текущее время в виде количества часов, минут и секунд.
Показать ответ
Ответ:
алисатян2
22.06.2020 15:11
Var h,m,s,a: integer;
begin
readln(a);
h:= a div 3600;
m:= (a - h*3600) div 60;
s:= a - m*60 - h*3600;
writeln(h); writeln(m);write(s);
end.
0,0
(0 оценок)
Ответ:
TigerForceCasual
22.06.2020 15:11
Uses crt;
var a,h,m,s:integer;
begin
readln(a);
h:=a div 3600;
a:=a mod 3600;
m:=a div 60;
a:=a mod 60;
s:=a;
write(h,':',m,':',s);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
nazardovhanich
19.02.2020 07:26
Устранение неполадок при вводе цифровой и аналоговой информации в персональный компьютер с различных носителей, периферийного и мультимедийного оборудования...
Dia1111111111111
17.07.2021 11:55
Определитель результат функции сцепить промолчать провести a241h 251 постоянно в два равных части и 2 равно стыдно...
ДианаЛаймова2003
27.12.2021 22:24
Текст составлен с использованием алфавита мощностью 64 символа и содержит 270 символов. Каков информационный объем текста...
botuguruur
21.07.2021 20:55
Биссектриса делит гипотенузу на отрезке в отношении 3: 4. в котором из отношений делить гипотенузу высота?...
sha14558538
21.07.2021 20:55
Полый медный куб с длиной ребра 10 см оказывает на стол давление 5 кпа.каков объём полости...
mmmmmaaaaruuu69
21.07.2021 20:55
Вфинале телевикторины участвуют 4 игрока,среди которых иван петрович.но главных призов только два,и они будут разыграны случайным образом с компьютера.какова вероятность...
Ogurchick
21.07.2021 20:55
Сочинение4кл.: тишь,глушь,ночь,полночь,сыч,камыш,рожь,дрожь...
Eg0rMirn9y
21.07.2021 20:55
Чем были вызваны массовые народные движения в странах европы в конце 1960-х гг.?...
fyjdtjjhtjh
21.07.2021 20:55
Стороны треугольника относятся как 4: 6: 9 найдите их учитывая что величина в 24 см есть; а)наибольшая сторона б)наименьшая сторона в)средняя сторона г)разность...
Aqvtttt
21.07.2021 20:55
Купленные в подарок игрушки (пистолет, мяч, кукла и машина) уложили в 4 коробки (красную синюю, зеленую и желтую) по одной игрушке в каждую. узнай, что положено...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
readln(a);
h:= a div 3600;
m:= (a - h*3600) div 60;
s:= a - m*60 - h*3600;
writeln(h); writeln(m);write(s);
end.
var a,h,m,s:integer;
begin
readln(a);
h:=a div 3600;
a:=a mod 3600;
m:=a div 60;
a:=a mod 60;
s:=a;
write(h,':',m,':',s);
end.