import Control.Applicative ((<$>)) import Data.List (sort) main :: IO () main = solve <$> readLn >>= mapM_ print solve :: Int -> [Int] solve n = sort [2 ^ i * 5 ^ j | i <- [0..n], j <- [0..n]]