var n,m,i,j,k,p,q:longint;
    a:array[0..250000] of longint;
    
begin
//  assign(input,'input.in');
  assign(input,'stramosi.in');
  assign(output,'stramosi.out');
  reset(input);
  rewrite(output);
  read(n,m);
  a[0]:=0;
  for i:=1 to n do read(a[i]);
  for i:=1 to m do begin
    read(p,q);
    while (q>1) and (p<>0) do begin
      p:=a[p];
      dec(q);
    end;
    writeln(a[p]);
  end;
end.