Question

Задана площадь фигуры квадрата круга. Определить, поместится ли круг в квадрате?

Answer 1

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.