program stramosi;
 uses crt;
 var a:array[0..25000] of integer;
     f,g:text;
     n,m,p,q,i,x,j:longint;
begin
 clrscr;
 assign(f,'stramosi.in'); reset(f);
 read(f,n,m);
 for i:=1 to n do
     read(f,a[i]);
 assign(g,'stramosi.out'); rewrite(g);
 for i:=1 to m do
     begin
       read(f,q,p);
       x:=q;
       for j:=1 to p do
           x:=a[x];
       writeln(g,x);
     end;
 close(f); close(g);
end.