import Data.Char
import Control.Monad

main :: IO ()
main = do
  n <- readLn :: IO Int
  mapM_ putStrLn $ map gen [1..n]
  
  where
    gen n = 'a' : ((map (\x -> chr (ord x + 48)) $ show n) ++ "a")