Помогите с Пасклем! На вход программе подаются три целых числа a, b, c – длины сторон треугольника. Вывести значение площади данного треугольника. Гарантируется, что с введёнными длинами сторон треугольник существует. Можно использовать любой способ нахождения площади треугольника.
Var a,b,c:integer; p,s:real; begin readln(a,b,c); p:=(a+b+c)/2; s:=sqrt(p*(p-a)*(p-b)*(p-c)); writeln('s = ',s:5:2); end. Пример: 3 4 5 s = 6.00