Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
sahverdijevelme1
25.04.2020 05:26 •
Информатика
Индивидуальное зачетное напишите программу, запрашивающую у пользователя время и сообщающую угол поворота минутной и часовой стрелки в градусах и радианах (помните, что тригонометрические функции в паскале работают с радианами)
Показать ответ
Ответ:
ззвееррекк
01.10.2020 20:17
Var
n,m:integer;
r1,r2:real;
begin
writeln('Введите количество часов: ');
readln(n);
writeln('Введите количество минут: ');
readln(m);
n:=n mod 12;
r2:=m/60*360;
r1:=(n*360+r2)/12;
writeln('Угол поворота часовой стрелки ',r1,' градусов или ',r1/180*Pi,' радиан');
writeln('Угол поворота минутной стрелки ',r2,' градусов или ',r2/180*Pi,' радиан');
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Daria20081
03.07.2021 22:19
Петя посылает Ване числовые коды от 0 до 255. Однако, эти коды особо важны — их могут перехватить, поэтому ребята договорились их шифровать. Алгоритм шифрования состоит из пяти...
lol09890
01.04.2020 21:55
Написать метод вычисления факториала числа, результат вычислений передавать в выходном параметре. Если метод отработал успешно, то вернуть значение true; если в процессе вычисления...
Nika152Vika
07.04.2022 20:52
надо! Буду очень Вам благодарен...
sasha17210
11.06.2022 04:02
Создайте программу в Pygame, как мальчик танцует казахский танец. • Пояснение к задаче: при разработке программы необходимо взять за основу команды движения автомобиля (код 1) в...
anmon07
19.01.2020 06:43
Напишите программу на паскале. в программу вводят 3 числа, например 15 28 10, и она должна выбрать среднею из них. т. е если дается 15 28 10 она должна выписать 15...
NeSkAfE821
23.09.2021 20:11
Ошибка времени выполнения: индекс находился вне границ массива как исправить? program a2; var s: string; i: integer; begin readln(s); for i: = 1 to length(s) do if s[i]= , then...
baten
18.08.2022 23:09
Каково количество возможных событий если после реализации одного из них мы получили количество информации равное 8 бит...
МаКсИк009
31.12.2020 15:28
Составить словесный линейный алгоритм с блок схемы...
Аurikа
09.10.2021 17:23
Запишите в десятичной системе счисления целое число, если дан его дополнительный код 0011100111001110...
marinamashkina2
02.09.2021 13:47
Пользователь вводит натуральное число n. необходимо вывести в консоль всевозможные результаты умножения числа a на число b, где в результате перемножения этих чисел, мы получим...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
n,m:integer;
r1,r2:real;
begin
writeln('Введите количество часов: ');
readln(n);
writeln('Введите количество минут: ');
readln(m);
n:=n mod 12;
r2:=m/60*360;
r1:=(n*360+r2)/12;
writeln('Угол поворота часовой стрелки ',r1,' градусов или ',r1/180*Pi,' радиан');
writeln('Угол поворота минутной стрелки ',r2,' градусов или ',r2/180*Pi,' радиан');
end.