x,y,*a=$<.read.split.map &:to_i
p x==y&&a.max<y ?y+1:x<y ?y:x