Написать программу нахождения площади высоты, радиусов вписанной и описанной окружности равностороннего треугольника со стороной а.
270
416
Ответы на вопрос:
PascalABC.Net
procedure Rad(a: real; n: integer);var R, R2: real;begin R := a / (2 * sin(pi / n)); R2 := R * cos(pi / n); Println('Радиус (Описаный): ', R); Println('Радиус (Вписаный): ', R2);end;begin var a := ReadReal('Введите A: '); var n := ReadInteger('Введите N: '); Rad(a, n);end.Varian 2
program HappyCoder; var R, R2, A: real; n: integer; begin Writeln('Введите A: '); Read(A); Writeln('Введите N: '); Read(n); R := a / (2 * sin(pi / n)); R2 := R * cos(pi / n); Writeln('Радиус (Описаный): ', R:0:3); Writeln('Радиус (Вписаный): ', R2:0:3); end.# Python 3.7.2
from math import sqrt
a = int(input())
h = sqrt(3) / 2 * a
r = a / (2 * sqrt(3))
R = a / sqrt(3)
print('Высота:', h)
print('Радиус вписанной окружности:', r)
print('Радиус описанной окружности:', R)
Объяснение:
Всегда - бесконечное выполнение действий
Повторить- определенное количество раз
Если- выполняет действия только при условии истинности
Популярно: Информатика
-
Лубаша24.02.2020 03:11
-
Jamik100813.01.2021 10:23
-
Hol0Ze504.08.2022 18:17
-
віта9клас25.11.2022 18:10
-
kornsergo2316.03.2023 13:53
-
Muna22224.04.2022 11:34
-
БолатовДосжан14.01.2020 11:26
-
Darishka2205.09.2021 01:26
-
Alrksanr26.03.2020 19:07
-
yaooiojhh04.06.2022 04:54