(define (main args) (let ([c (read-line)]) (format #t "1 ~a~%" c) 0) )