main = do
  l <- getLine
  let [a,b] = map read $ words l
  mapM_ print $ filter nabe [a..b]

nabe x = mod x 3 == 0 || elem '3' (show x)