program palace
	implicit none
    integer :: N,T,A,i,pt
    integer,allocatable :: H(:)
	real :: temp,dt
    dt=10000.0
	read(*,*) N
    read(*,*) T,A
    allocate(H(N))
    read(*,*) H
    do i=1,N
    	temp=ABS(T-0.006*H(i)-A)
        !write(*,*) temp
        if(temp.lt.dt) then
        	dt=temp
            pt=i
        endif
    end do
    write(*,'(i0)') pt
    deallocate(H)


end program palace