x,y,l=$<.map &:to_i
z=x.abs
p z/-l*-1+0**z+(y>0?y/-l*-1:y/l*-1+1)