program main
implicit None
	integer(8)::n,p,i
	
	if(n ==1)then
		print 101,p
		stop
	endif
	
	do i = 1000000,1,-1
		if(mod(p,i**n) == 0)then
			print 101,i
			stop
		endif
	enddo
101 format(i0)
end program main