Пользователи вводят длину стороны треугольника, вывести на экран его площадь

// PascalABC.NET 3.3, сборка 1576 от 16.11.2017
// Внимание! Если программа не работает, обновите версию!

begin
var (a, b, c):= ReadReal3('a, b, c =');
var p:=(a + b + c)/2;
Writeln('S = ',sqrt(p*(p - a)*(p - b)*(p - c)):0:5);
end.