ll x,i=1e6;{for(rd(x);--i;)x%(i*i)||(x/=i*i);wt(x);}