program asd;

var
  a, b, c, p, s: real;

begin
  writeln('Введите стороны треугольника');
  readln(a, b, c);
  if (a + b < c) or (a + c < b) or (c + b < a) then writeln('Такого треугольника не существует');
  p := (a + b + c) / 2;
  s := sqrt(p * (p - a) * (p - b) * (p - c));
  writeln('Площадь треугольника = ', s);
end.