loop do
  n,m = gets.split.map(&:to_i)
  break if n|m==0
  bor=[0]
  n.times do
    bor<<gets.to_i
  end
  pos = 1
  m.times do |i|
    num = gets.to_i
    pos +=num
    if pos >=n
      puts i+1
      (m-i-1).times {gets}
      break
    end
    pos +=bor[pos]
    if pos >=n
      puts i+1
      (m-i-1).times {gets}
      break
    end
  end
end