program FizzBuzz;
var
  S: String;
  i, R, C: Integer;
begin
  for i := 1 to 100 do
  begin
    Str(i, S);
    S := S + Copy('Fizz', i mod 3 * 9, 4) + Copy('Buzz', i mod 5 * 9, 4);
    Val(S, R, C);
    Writeln(Copy(S, C, 8));
  end;
end.