import sequtils, strutils

const
  s = ["FizzBuzz", "Fizz", "Buzz"]
let
  a = stdin.readLine.split.map parseInt
var
  result = 0

for x in a:
  var
    y: string

  if (x mod 15) == 0:
    y = s[0]
  elif (x mod 3) == 0:
    y = s[1]
  elif (x mod 5) == 0:
    y = s[2]
  else:
    y = $x

  result.inc y.len

echo result