gets;~/ /;a=eval$' r=gets[a-=1] v=r==?(?1:-1 c=0;p$$.times{|i|c+=r==$_[x=a+v*i]?1:-1;c<1&&(break x)}