import Data.List

main = print . take 100 . sort . concatMap (\x -> take 100 $ iterate (x*) x) $ [3, 5, 7]