var
  a:array[0..256000]of real;
  n,m:longint;

begin
  while not eof do
  begin
    inc(n);
    read(a[n]);
    a[n]:=sqrt(a[n]);
  end;
  for n:=n downto 1 do
    writeln(a[n]:0:4);
end.

operator 操作符(两个元)操作符名:返回类型;

var
  a,b:longint;

  operator **(a,b:longint)p:longint;
  var
    i,j:longint;
  begin
    j:=1;
    for i:=1 to b do
      j:=j*a;
    exit(j);//also can be p:=j;
  end;

begin
  readln(a,b);
  writeln(a**b);
end.

type
  int128=record
    len:longint;
    data:Array[0..2600]of int64;
  end;
var
  a,b,c,d:int128;

  procedure readi(var p:int128);
  var
    i,j:longint;
    s:ansistring;
  begin
    readln(s);
    if length(s) mod 8>0 then p.len:=length(s) div 8+1 else
      p.len:=length(s)  div 8;
    j:=1;
    while s<>'' do
    begin
      val(copy(s,length(s)-7,8),p.data[j]);
      s:=copy(s,1,length(s)-8);
      inc(j);
    end;
  end;

  procedure fix(var p:int128);
  var
    i,j:longint;
  begin
    for i:=1 to 2555 do
    begin
      p.data[i+1]:=p.data[i+1]+p.data[i] div 100000000;
      p.data[i]:=p.data[i] mod 100000000;
    end;
    for i:=2555 downto 1 do
      if p.data[i]>0 then
      begin
        p.len:=i;
        exit;
      end;
  end;

  operator +(var a,b:int128)p:int128;
  var
    i,j:longint;
  begin
    fillchar(p,sizeof(p),0);
    if a.len>b.len then
      p.len:=a.len else p.len:=b.len;
    for i:=1 to p.len do
      p.data[i]:=a.data[i]+b.data[i];
    fix(p);
  end;

  operator *(var a,b:int128)p:int128;
  var
    i,j,k:longint;
  begin
    fillchar(p,sizeof(p),0);
    for i:=1 to a.len do
    begin
      fillchar(c,sizeof(c),false);
      for j:=1 to b.len do
        c.data[i+j-1]:=a.data[i]*b.data[j];
      fix(c);
      p:=p+c;
    end;
  end;

  procedure writei(var p:int128);
  var
    i,j:longint;
  begin
    write(p.data[p.len]);
    for i:=p.len-1 downto 1 do
    begin
      if p.data[i]<10 then write('0000000') else
      if p.data[i]<100 then write('000000') else
      if p.data[i]<1000 then write('00000') else
      if p.data[i]<10000 then write('0000') else
      if p.data[i]<100000 then write('000') else
      if p.data[i]<1000000 then write('00') else
      if p.data[i]<10000000 then write('0');
      write(p.data[i]);
    end;
    writeln;
  end;

  procedure main;
  begin
    readi(a);
    readi(b);
    c:=a*b;
    writei(c);
  end;

begin
  main;
end.