Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
zombdanidani
03.03.2023 11:29 •
Информатика
Написать программу на паскале abc. 1)вычислить периметр и площадь правильного n-угольника, описанного около окружности радиуса r.
Ответ:
Ganifa505
27.07.2020 07:50
Program Main;
Var n,R,P,S:Real;
Begin
Readln(R,n);
P:=(n*2*R*(sin(180)\cos(180))\n;
S:=1\2*P*R;
End.
Всякие там выводы на экран, сами сделаете)
0,0
(0 оценок)
Популярные вопросы: Информатика
3ТОН
09.07.2021 17:48
Даны ячейки электронной таблицы с адресами da15, d10, ab3000, r5, ah102, ka200, b17000. какие из перечисленных ячеек электронной таблицы не существуют и почему?...
School30zh
14.09.2021 19:12
1. ввести три числа, найти их сумму, произведение и среднее арифмитическое: пример: ввести 3 числа. 4 5 7 4+5+7=16 4*5*7=140 (4+5+7): 3=5,3(3)...
GTmoonsoonall
09.09.2021 09:30
Pascal проверить присутствие в массиве вещественных чисел отрицательных элементов, квадрат которых больше 100. ограничения: -число элементов в матрице не более 10-ти порядок...
ыооп
24.07.2022 05:26
Переведсти целые числа из десятичной системы счисления в троичную: 1. 523; 65; 7000; 2307; 325; 2. 12; 524; 76; 121; 56....
HrenSGori
24.07.2022 05:26
Расположите числа в порядке возрастания: 10001(2); в5(16); 73(8); 87(10) решить буду рад если !...
Alex9798
31.05.2023 10:57
Считая, что каждый символ кодируется одним байтом, определите, чему равен информационный объем следующего высказывания: ученье свет, а не ученье тьма. 1) 31 бит 2) 248 бита...
murka280705
14.06.2021 19:29
:сисадмин хранит в кабинете в 2 раза больше мониторов, чем системных блоков. затем он принёс ещё 8 системных блоков, и предметов стало поровну. вопрос: сколько в кабинете...
ЯУмницаРаЗуМнИцА
14.02.2020 13:43
1)вывести трехзначные числа сумма цифр которых простое число pascal. 2)дана последовательность 5,9,13, составте программу для определения числа слагаемых, сумма которых...
konulrzayevaa
16.02.2023 20:30
Составить программу выводящию значение true если указанное высказывание является истинным и false в противном случае среди чисел a, b, c есть хотя бы одна пара взаимно противоположных...
Ровног
05.02.2022 16:50
Электронная таблица – это: выберите один ответ: a. устройство персонального компьютера, его ресурсами b. все ответы верны c. прикладная программа для обработки кодовых таблиц...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Var n,R,P,S:Real;
Begin
Readln(R,n);
P:=(n*2*R*(sin(180)\cos(180))\n;
S:=1\2*P*R;
End.
Всякие там выводы на экран, сами сделаете)