Опишите переменные, необходимые для вычисления площади треугольника по его трем сторонам, и запишите оператор, обеспечивающий ввод необходимых исходных данных.

//a,b,c-стороны треугольника//p-полупериметрvar    a, b, c, p: real;begin    readln(a, b, c);    p := (a + b + c) / 2;    writeln('S=', sqrt(p * (p - a) * (p - b) * (p - c))); // формула геронаend.