import Control.Monad

fizzbuzz:: Int  -> String
fizzbuzz n = case n of
  _ 
    | (mod n 15) == 0 -> "FizzBuzz"
    | (mod n 3) == 0 -> "Fizz"
    | (mod n 5) == 0 -> "Buzz"
    | otherwise -> show n


main = do
  n <- fmap (\c -> read c ::Int) getLine
  forM [1..n] $ \i -> do
    putStrLn $ fizzbuzz i