import Data.List (nub, sort)

enumAmount :: Integral a => a -> a -> [a]
enumAmount a b = nub $ sort cs
    where cs = [i + 5 * j | i <- [0 .. a], j <- [0 .. b], i /= 0 || j /= 0]

main :: IO ()
main = do
    [a, b] <- fmap read . words <$> getLine :: IO [Int]
    putStr $ unlines $ show <$> enumAmount a b