program CircleInSquare;

var
S1, S2, dSquare, dCircle: real;

begin
//Первый случай: S1=70, S2=36,74
S1 := 70;
S2 := 36.74;

dSquare := sqrt$2<em>S2$; //находим диагональ квадрата
dCircle := sqrt$S1/3.1416$ 2; //находим диаметр окружности

if dCircle <= dSquare then
writeln${}^{\prime }Кругпомещаетсявквадрат{е}^{\prime }$ else
writeln${}^{\prime }Кругнепомещаетсявквадрат{е}^{\prime }$;

//Второй случай: S1=0.86, S2=0.64
S1 := 0.86;
S2 := 0.64;

dSquare := sqrt$2<em>S2$; //находим диагональ квадрата
dCircle := sqrt$S1/3.1416$ 2; //находим диаметр окружности

if dCircle <= dSquare then
writeln${}^{\prime }Кругпомещаетсявквадрат{е}^{\prime }$ else
writeln${}^{\prime }Кругнепомещаетсявквадрат{е}^{\prime }$;

end.