      PROGRAM IhateFactorization
      IMPLICIT NONE
      integer(16) :: x
      integer(16) :: a,b
      
      read*,x
      
      do a = -200,200
        do b = -200,200
          if( a**5-b**5==x )then
            print*,a,b;stop
          end if
        end do
      end do
      
      
      
      
      END PROGRAM