var
s,p:real;
a,b,c:integer;
begin
writeln('Введите две стороны ровнобедренного треугольника');
readln(a,b);
p:=(a+b+c)/2;
s:=(b*sqrt(sqr(a)-sqr(b)/4))/2;
writeln('Площадь треугольника равна',' ',s,' ','сантиметрам');
readln
end.