Аглаий
6 год назад
ПомогииитттеееВычислите радиус RB вписанной и радиус RO описанной около треугольника окружности, если заданы стороны треугольника A, B, CRB=S/P RO=A*B*C/4Sгде S-площадь, P-полупериметр треугольника
ОТВЕТЫ
Wright Peter
Oct 24, 2020
var a,b,c,p,s,rb,ro: real;
begin
readln(a,b,c);
p:=(a+b+c)/2;
s:=sqrt(p*(p-a)*(p-b)*(p-c));
rb:=s/p;
ro:=a*b*c/(4*s);
writeln('rb = ',rb:6:2,' ro = ',ro:6:2);
end.
Пример:
4 4 4
rb =1.15 ro =2.31
begin
readln(a,b,c);
p:=(a+b+c)/2;
s:=sqrt(p*(p-a)*(p-b)*(p-c));
rb:=s/p;
ro:=a*b*c/(4*s);
writeln('rb = ',rb:6:2,' ro = ',ro:6:2);
end.
Пример:
4 4 4
rb =1.15 ro =2.31
993
Смежные вопросы:
