uses
  SysUtils;

var
 x:array [1..150000] of real;
 size,i:integer;
 n:double;
begin
  size:=0;
  while not seekeof do
  begin
    read(n);
    inc(size);
    x[size] := sqrt(n);
  end;
  for i:=size downto 1 do
    writeln(x[i]:0:4);
  readln;
  readln;
  readln;
end.