func main()
	var s: []char :: cui@input()
	var n3: int :: 0
	var n5: int :: 0
	for i(0, ^s - 1)
		var d: int :: s[i] $ int - '0' $ int
		do n3 :+ d
		do n5 :+ ((i % 2 = 0) ?(1, -1)) * d
	end for
	if(n3 % 3 = 0 & n5 % 5 = 0)
		do cui@print("FizzBuzz\n")
	elif(n5 % 5 = 0)
		do cui@print("Buzz\n")
	elif(n3 % 3 = 0)
		do cui@print("Fizz\n")
	else
		do cui@print("\{s}\n")
	end if
end func