Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
Mockov
16.12.2021 00:39 •
Информатика
Pascal.определить h - полное количество часов и m - полное количество минут от начала суток до того момента (в первой половине дня), когда часовая стрелка повернулась на f градусов (0
Ответ:
alinaalin2208
10.10.2020 03:45
var h,m,f:integer;
BEGIN
readln(f);
h:=f div 30;
m:=(f mod 30)*2;
write(h,' ч ',m,' мин');
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Masha0501
21.09.2021 01:11
1,7738Е-3 нормализованная записа даного числа :...
mirator91
30.12.2020 21:46
Составить блок-схему решения квадратного уравнения ax2+bx+c =0 , если а 0 )...
кира19732819863
19.03.2021 20:58
Выберите возможные задания списка а) 1b = [1, 3]б)r = listsв)c = []г)a = list( строка, а не список )д)l = [ l , i , [ st ], 7]е) d = listнужно...
Alniri
12.07.2020 13:39
Паскаль. найти произведение всех нечетных чисел от числа а до числа b !...
vigolnikov
04.04.2021 00:01
Вячейку а записывают n раз произвольное число. определить, сколько среди этих чисел положительных. в pascal...
MyNameIsLiza123
27.01.2020 10:00
Дан одновременный массив.запиши верный ответ...
crustiYurasova
31.01.2020 21:20
Переведите в двоичную систему счисления число xvii....
MariaUt
16.01.2021 08:39
10 студентов экзамены по 5 дисциплинам. по каждой дисциплине можно получить оценку – 2, 3, 4, 5. определить среди 10 студентов чело- века с наибольшим средним . построить...
amid2003
12.10.2022 20:19
Необходимо вычислить в Excel 804⋅61. Запись в MS Excel выглядит следующим образом: =804∗61 +804+61 804×61...
Abdresh
12.04.2023 10:09
Найдите значение выражения b в квадрате -6 при b=корень3 -2 решите...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var h,m,f:integer;
BEGIN
readln(f);
h:=f div 30;
m:=(f mod 30)*2;
write(h,' ч ',m,' мин');
end.