#include <cstdio>

#include <cmath>

#include <cstring>

#include <algorithm>

using namespace std;

typedef long long LL;

const int N = 3e4+;

const int mod = 1e9+;

LL c[N];

int n,q,x,y,T,pre[N];

struct Node{

  int v,id;

}a[N];

bool cmpv(Node a,Node b){

  if(a.v==b.v)return a.id<b.id;

  return a.v<b.v;

}

bool cmpid(Node a,Node b){

  return a.id<b.id;

}

void add(int x,LL t){

  for(int i=x;i<=n;i+=i&(-i))c[i]+=t;

}

LL ask(int x){

  LL ret=;

  for(int i=x;i;i-=i&(-i))ret+=c[i];

  return ret;

}

struct Que{

  int l,r,id;

  bool operator<(const Que &rhs)const{

    return r<rhs.r;

  }

}p[];

LL ret[];

int main(){

  scanf("%d",&T);

  while(T--){

    scanf("%d",&n);

    for(int i=;i<=n;++i)scanf("%d",&a[i].v),a[i].id=i;

    sort(a+,a++n,cmpv);

    for(int i=;i<=n;++i){

      pre[a[i].id]=-;

      if(i!=&&a[i].v==a[i-].v)pre[a[i].id]=a[i-].id;

    }

    sort(a+,a++n,cmpid);

    memset(c,,sizeof(c));

    scanf("%d",&q);

    for(int i=;i<q;++i)scanf("%d%d",&p[i].l,&p[i].r),p[i].id=i;

    sort(p,p+q);

    for(int i=,cur=;i<q;++i){

      for(;cur<=p[i].r;++cur){

         if(pre[cur]!=-)add(pre[cur],-a[cur].v);

         add(cur,a[cur].v);

      }

      ret[p[i].id]=ask(p[i].r)-ask(p[i].l-);

    }

    for(int i=;i<q;++i)printf("%I64d\n",ret[i]);

  }

  return ;

}