(define (solve n) (cond [(string=? n "0") "0"] [else (string-append n "0")])) (define (main args) (let1 n (read-line) (print (solve n))) 0)