(define (read-number) (string->number (read-line))) (let* ((x (read-number)) (y (read-number)) (l (read-number))) (print (+ (div (+ (- l 1) (abs x)) l) (div (+ (- l 1) (abs y)) l) (cond ((= x 0) (= y 0) 0) ((>= y 0) 1) (else 2)))))