Question

Определить площадь треугольника по формуле Герона при заданных a,b,c. Формула Герона: c =корень p*(p-a)*(p-b)*(p-c). Где p - полу периметр
Помогите пожалуйста

Answer 1

Program n1;
var a,b,c,p: real;
begin
readln(a,b,c);
p:=(a+b+c)/2;
write('S=',sqrt(p*(p-a)*(p-b)*(p-c)));
end.