program stramosi;
 var a:array [1..250000] of longint;
   i,q,n,m,p,j,k:longint;
   fi,fo:text;
begin
 assign(fi,'stramosi.in');
  reset(fi);
 assign(fo,'stramosi.out');
  rewrite(fo);
 readln(fi,n,m);
 for i:=1 to n do
  read(fi,a[i]);
 readln(fi);
 for i:=1 to m do begin
  readln(fi,q,p);
  k:=0;
  if p=1 then writeln(fo,a[q])
  else
  if (q-p+1>0) then
   for j:=q downto 2 do begin
    if a[j]<>a[j-1] then inc(k);
     if k=p-1 then begin
                    writeln(fo,a[j-1]);
                    break;
                    end
     else if j=2 then writeln(fo,'0');
     end
    else writeln(fo,'0');
  end;
close(fo);
end.