(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 ((and (= x 0) (= y 0)) 0) ((>= y 0) 1) (else 2)))))