<>;@d=sort{$b-$a}<>=~/\d+/g;$x=abs(<>!~$"|abs($`)>abs($')?$`:$');print!$x?0:(grep{$_ eq$x}@d)?1:abs($x-$d[0])/$d[0]+($x%$d[0]?2:1)|0