open System let fb x = match (x%3, x%5) with | (0, 0) -> "FizzBuzz" | (_, 0) -> "Buzz" | (0, _) -> "Fizz" | _ -> string x let N = int(Console.ReadLine()) [1..N] |> List.map fb |> List.iter (printfn "%s")