import Control.Monad

main = do
  nl <- getLine
  let n = read nl
  forM_ [1..n] fz

fz k
 | mod k 15 == 0 = putStrLn "FizzBuzz"
 | mod k 3 == 0 = putStrLn "Fizz"
 | mod k 5 == 0 = putStrLn "Buzz"
 | True = putStrLn $ show k