gets p $<.read.split.map(&:to_i).each_slice(2).all?{|x,y| $a||=y-x;$a==y-x&&$a>0 }?$a:-1