program line_plus_plus
  implicit none
  integer :: n, x, y, i, j, c(2000) = 0, m
  read(*,*) n, x, y
  do i = 1, n-1
    do j = i+1, n
      m = min(j-i,abs(x-i)+1+abs(j-y))
      c(m) = c(m)+1
    end do
  end do
  do i = 1, n-1
    write(*,'(i0)') c(i)
  end do
end program line_plus_plus