import Control.Applicative

fizzbuzz x
  | x`mod`15==0 = "FizzBuzz"
  | x`mod`3==0  = "Fizz"
  | x`mod`5==0  = "Buzz"
  | otherwise   = show x

main = do
  n <- read <$> getLine
  putStr $ unlines $ map fizzbuzz [1..n]