---

var
  x:qword;
begin
  while not eof do begin
    readln(x);
    writeln(exp(1/3*ln(x)):0:0);
  end;
end.