1. Информатика
  2. Дан радиус окружности, описанной

Дан радиус окружности, описанной около правильного 6-угольника. найти площадь. через паскаль

Tanya200404 Tanya200404    2   23.06.2019 06:30    0

Ответы
Masha6996 Masha6996  19.07.2020 08:18
Var s,r:real;
begin
 write('введите радиус описанной окружности');
 readln(r);
 s:=3*sqrt(3)*r*r/2;
 writeln('площадь равна= ',s:6:2);
end.
и все
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
hhhhh122 hhhhh122  16.06.2019 00:10
2)что такое тактовая частота и разрядность процессора 3)в чем отличие оперативной и внешней памяти 4)для чего нужна видеокарта и звуковая карта 5)перечислить устройства ввода...
фейс4 фейс4  15.03.2021 07:14
Дан фрагмент кода. Определите значение result.Иммерсивное средство чтения int i=1, result=0; while (i =10) { result += i. i++; } label1.Text = result.ToString(); result =...
Arkanius Arkanius  15.03.2021 07:14
Создайте программу, которая принимает возраст в годах и возвращает возраст в дни....
denchik20041 denchik20041  25.02.2020 05:52
ответе на во информатика за 6 класс​...
Kettiplay Kettiplay  25.02.2020 04:58
В программе pascal ABC написать обзац любого стихотворения с НАКЛОННЫМ шрифтом и ЗЕЛЁНЫМ цветом БУКВ. Заранее вам....
Россия111111111111 Россия111111111111  25.02.2020 02:09
Мне нужно получить формулу для решения в PythonЗадание: Откройте среду разработки программного обеспечения IDLE и создайте новый файл Python. Разработайте программу, для решения...
998l 998l  25.02.2020 02:33
Известно, что изображение содержит 600 пикселей по горизонтали и 400-по вертикали. Значит ли это, что при отображении на разных устройствах оно будет иметь одинаковые физические...
д2и0а0н6а д2и0а0н6а  25.02.2020 02:33
На рисунке представлены многократно увеличенное изображение жидкокристаллического монитора. Сколько пикселей выделено на рисунке в белой рамке.​...
Chillin Chillin  28.04.2021 20:49
PYTHON Давайте напишем программу, которая будет проверять кому можно попасть в кинотеатр. В кино бесплатно пускают детей до 7 лет, а вот взрослых пускают только с билетом....
grexegor grexegor  28.04.2021 20:47
Запишите значение переменной s, полученное в результате работы следующей программы. Var s,k: integer; Begin s := 0; for k := 5 to 9 do s := s + 8; writeln(s); End....

Популярные вопросы