Дана сторона А(ввести с клавиатуры) равностороннего треугольника .найти радиусы в
Дана сторона А(ввести с клавиатуры) равностороннего треугольника .найти радиусы вписанной и описанной окрудностей
R=a/2*корень из3
R2=A/корень из3
Гость
Ответ(ы) на вопрос:
Гость Var
a,r1,r2:real;
begin
readln(a);
r1:=a/2*sqrt(3);
r2:=a/sqrt(3);
writeln('радиус вписанной ',r1:0:4,' радиус описанной ',r2:0:4);
end.
Не нашли ответ?
Похожие вопросы