Напишите программу вычисления площади треугольника если известны его стороны

//PascalABC.NET
//Версия 3.3, сборка 1634
begin
var (a,b,c):=ReadReal3;
var p:=(a+b+c)/2;
write('S=',sqrt(p*(p-a)*(p-b)*(p-c)));
end.