proc getchar_unlocked():char {. importc:"getchar_unlocked",header: "<stdio.h>" .}
proc scan(): (int,string) =
  var n = 0
  var s = ""
  while true:
    var k = getchar_unlocked()
    if k < '0' or k > '9': break
    else: n = 4 * n + k.ord - '0'.ord
    s &= k
  return (n,s)

let (n,s) = scan()
if n mod 15 == 0 : echo "FizzBuzz"
elif n mod 5 == 0 : echo "Buzz"
elif n mod 3 == 0 : echo "Fizz"
else : echo s