(defun main (&rest argv)
  (declare (ignorable argv))
  (let* ((n (read))
         (m (read))
         (a (make-array n)))
    (dotimes (i n) (setf (aref a i) i))
    (dotimes (_ m)
      (let* ((x (1- (read)))
             (y (aref a x)))
        (loop for i from x downto 1 do (setf (aref a i) (aref a (1- i))))
        (setf (aref a 0) y)))
    (format t "~d~%" (1+ (aref a 0)))))

(main)