program palace
	implicit none
    integer :: N,T,A,i,pt
    integer,allocatable :: Heights
    real :: Temps,dt
    
    read(*,*) N
    read(*,*) T,A
    allocate(Heights(N))
    
    read(*,*) Heights
    dt=100000000
    pt=-1
    do i=1,N
    	Temps=abs(T-Heights(i)*0.006-A)
        if(dt.gt.Temps) then
        	pt=i
        endif
    end do
    
    write(*,'(i0)') pt
    deallocate(Heights)
   	

end program palace