Заданы a b c стороны треугольника вычислить радиус вписанной окружности

Скорость время растояние =2^b*n

Объяснение:

Otvet:250

program z1;

var a,b,c,p,rv,ro:real;

begin

write('a = ');

readln(a);

write('b = ');

readln(b);

writeln('c = ');

read(c);

p:=(a+b+c)/2;

rv:=sqrt((p-a)*(p-b)*(p-c)/p);

ro:=a*b*c/(4*sqrt(p*(p-a)*(p-b)*(p-c)));

writeln('r = ',rv);

writeln('R = ',ro);

end.

Объяснение:

Ввод сторон

Вычисление полупериметра

Вычисление радиуса вписанной окружности

Вычисление радиуса описанной окружности

Вывод радиусов на экран