program main
  implicit none
  
  integer :: i,n,t,a,h(1000),best
  real :: tt, sa = 1d10
  
  read(*,*)n
  read(*,*)t,a
  read(*,*)(h(i),i=1,n)
  
  do i = 1, n
    tt = t - 0.006*h(i)
    if (abs(tt-a) < sa) then
      best = i
      sa = abs(tt-a)
    end if
  end do
  write(*,*)best
end program main