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

{требуются переменные под длинны сторон, для площади и промежуточная для полупериметра;
программа:}
Program n1;
var a,b,c,S,p: real; {описание переменных}
begin
readln(a,b,c); //ввод данных
p:=(a+b+c)/2;
S:=sqrt(p*(p-a)*(p-b)*(p-c));
writeln('площадь: ',S);
end.