-- yukicoder My Practice -- author: Leonardone @ NEETSDKASU main = print . (9 +) . sum . map (flip mod 10 . ($ 1) . ((-) . (+) 10) . flip mod 10) . ($ [0..]) . zipWith ((. (10 ^)) . div) . replicate 9 =<< readLn