Известны длины сторон треугольника a, b, c. Напишите программу, вычисляющую площадь этого треугольника
Паскаль
var
a, b, c, p: real;
begin
read(a, b, c);
p := (a + b + c) / 2;
write('Площадь треугольника = ', sqrt(p * (p - a) * (p - b) * (p - c)));
end.