let f n =
    match (n % 3, n % 5) with
    | (0, 0) -> "FizzBuzz"
    | (0, _) -> "Fizz"
    | (_, 0) -> "Buzz"
    | (_, _) -> n.ToString ()

let n = stdin.ReadLine () |> int
seq { 1..n }
    |> Seq.map f
    |> Seq.iter (printfn "%s")