Есть ответ 👍

Дана сторона а(ввести с клавиатуры) равностороннего треугольника .найти радиусы вписанной и описанной окрудностей r=a/2*корень из3 r2=a/корень из3

227
440
Посмотреть ответы 2

Ответы на вопрос:


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.

ответ:

begin

read(n);

for i: =1 to n do

begin

read(a[i]);

a[i]: =(i mod 2)*a[i];

end;

end.

Популярно: Информатика