import Control.Monad
import Text.Printf
import Control.Applicative
import Data.List

main :: IO()
main = do
  k <- readLn
  forM_ [0..k-1] $ \i -> do
    let (a, b) = (i :: Integer) `divMod` 9
    let r = replicate (read (show a) :: Int) '9'
    printf "%s\n" $ show (b+1) ++ r
