(defun main (&rest argv)
  (declare (ignorable argv))
  (let* ((n (read))
         (k (read)))
    (declare (ignore k))
    (loop for i from 2 to n
          when (zerop (mod n i))
            do (format t "~d~%" (floor n i))
               (return))))

(main)