var a:array[1..32769] of longint;
     i,n:longint;
begin
i:=0;
while not seekeof do
        begin
        i:=i+1;
        read (a[i]);
        end;
n:=i;
for i:=n downto 1 do writeln (sqrt(a[i]):0:4)
end.