Вычислите радиус RB вписанной и радиус RO описанной около треугольника окружности, если заданы стороны треугольника A, B, C

RB=S/P RO=ABC/4S

где S-площадь, P-полупериметр треугольника

Question

Информатика

Ермиония

14 июня, 17:07

Вычислите радиус RB вписанной и радиус RO описанной около треугольника окружности, если заданы стороны треугольника A, B, C

RB=S/P RO=ABC/4S

где S-площадь, P-полупериметр треугольника

+5

Ответы (1)

Знаешь ответ?

Емилий · Answer 1

Var a, b, c, s, p, p1, RB, RO:real; begin readln (a); readln (b); readln (c); p1:=a+b+c; p:=p1/2; s:=sqrt (p1 * (p1-a) * (p1-b) * (p1-c)); RB:=s/p; RO: = (a*b*c) / (4*s); writeln ('радиус вписаной ', RB,' радиус описанной ', RO); end.