implicit none
integer i,j

read(*,*) j
 do i=1,j
  if (mod(i,15)==0) then
      write(*,*)"FizzBuzz"
  else if (mod(i,3)==0) then
      write(*,*)"Fizz"
  else if (mod(i,5)==0) then
      write(*,*)"Buzz"
  else
      write(*,*) i
  end if
 end do
end