var
   i,n:longint;
   o  :real;

begin
   o:=1;
   readln(n);
   for i:=1 to n do begin
     o:=o*(1+(1/(i*i)));
   end;
   writeln(trunc(o*10)/10);
   readln;
end.