Составить программу вычисление площади треугольника по трём сторонам. S=1\2aha

Спасибо)

По трем сторонам - формула Герона.var a,b,c,p:real;beginwrite('Введите стороны: ');readln(a,b,c);p := (a + b + c) / 2;writeln('Площадь равна ', sqrt(p * (p - a) * (p - b) * (p - c)):9:4);end.А через основание и высоту (твоя формула):var a,h:real;beginwrite('Введите длину основания и высоты, проведенной к нему: ');readln(a, h);writeln('Площадь равна: ', (a * h) / 2:9:4);:9:4 -- это такой оператор, который выводит число в формате с фиксированной точкой и 4 знаками после запятой.