let n = Scanf.scanf "%d" (fun n->n)
let (t,a) = Scanf.scanf " %d %d" (fun t a->t,a)
let hs = Array.init n (fun i-> Scanf.scanf " %d" (fun h->h))
let _ =
  let (v,p,_) = Array.fold_left (fun (v,p,i) h  ->
    let t = t*1000 - h*6 in
    let v1 = abs (t - a*1000) in
    (*Printf.printf "i=%d v1=%d v=%d\n" i v1 v;*)
    if v1 <= v then (v1,i,i+1) else (v,p,i+1)
  ) (50000000000,-1,1) hs in
  Printf.printf "%d\n" p