import Control.Monad
import Data.List
ans::[Int]
ans = [1..9]++((concat [[((10^k)*j)+((10^k)-1)|j<-[1..9*k],mod j 10 /= 9]|k<-[0..]]))

main::IO()
main=do
  kc<-getLine
  let k = read kc::Int
  forM_ (take k ans) (\ j -> print j)