(define (main args) (let* ([l (read)] [r (read)] [n (read)] [ql (quotient l n)] [rl (remainder l n)] [qr (quotient r n)] [rr (remainder r n)] [bn (- qr ql -1)]) (for-each print (map (^r (- bn (if (< r rl) 1 0) (if (> r rr) 1 0))) (iota n)))) 0)