Задана площадь фигуры квадрата круга. Определить, поместится ли круг в квадрате?
var s1,s2:real; begin readln(s1,s2); if sqrt(s1)>=2*sqrt(s2/(2*3.14)) then writeln('pomestitsya') else writeln('ne pomestitsya'); end.