#include <cstdio>
#include <algorithm>
#include <ctime>

using namespace std;

#define MAXN 2000009
#define N 26
    int next[MAXN][N] ;//next指针，next指针和字典树类似，指向的串为当前串两端加上同一个字符构成  
    int fail[MAXN] ;//fail指针，失配后跳转到fail指针指向的节点  
    int cnt[MAXN] ;  
    int num[MAXN] ;  
    int len[MAXN] ;//len[i]表示节点i表示的回文串的长度  
    int S[MAXN] ;//存放添加的字符  
    int last ;//指向上一个字符所在的节点，方便下一次add  
    int n ;//字符数组指针  
    int p ;//节点指针  
  
    int newnode ( int l ) {//新建节点  
        for ( int i = 0 ; i < N ; ++ i ) next[p][i] = 0 ;  
        cnt[p] = 0 ;  
        num[p] = 0 ;  
        len[p] = l ;  
        return p ++ ;  
    }  
  
    void init () {//初始化  
        p = 0 ;  
        newnode (  0 ) ;  
        newnode ( -1 ) ;  
        last = 0 ;  
        n = 0 ;  
        S[n] = -1 ;//开头放一个字符集中没有的字符，减少特判  
        fail[0] = 1 ;  
    }  
  
    int get_fail ( int x ) {//和KMP一样，失配后找一个尽量最长的  
        while ( S[n - len[x] - 1] != S[n] ) x = fail[x] ;  
        return x ;  
    }  
  
    void add ( int c ) {  
        S[++ n] = c ;  
        int cur = get_fail ( last ) ;//通过上一个回文串找这个回文串的匹配位置  
        if ( !next[cur][c] ) {//如果这个回文串没有出现过，说明出现了一个新的本质不同的回文串  
            int now = newnode ( len[cur] + 2 ) ;//新建节点  
            fail[now] = next[get_fail ( fail[cur] )][c] ;//和AC自动机一样建立fail指针，以便失配后跳转  
            next[cur][c] = now ;  
            num[now] = num[fail[now]] + 1 ;  
        }  
        last = next[cur][c] ;  
        cnt[last] ++ ;  
    }  
  
    void count () {  
        for ( int i = p - 1 ; i >= 0 ; -- i ) cnt[fail[i]] += cnt[i] ;  
        //父亲累加儿子的cnt，因为如果fail[v]=u，则u一定是v的子回文串！  
    }  
int readint(){
    int ch=getchar(),ret=0;
    while(ch<'0' || ch>'9') ch=getchar();
    while(ch>='0' && ch<='9') ret=ret*10+ch-'0',ch=getchar();
    return ret;
}
int nn;
struct rec{
    int l,r,num;
}a[100009];
bool cmp(rec x,rec y){
    if (x.l!=y.l) return x.l<y.l;
    else return x.r<y.r;
}
int TT,ch,c[100009],q,h,ans[100009];
int main(){
//    freopen("pretest.in","r",stdin);
//    freopen(".out","w",stdout);
    scanf("%d",&TT);
    while(TT--){
        nn=0;
        ch=getchar();
        while(ch<'a' || ch>'z') ch=getchar();
        while(ch>='a' && ch<='z') c[++nn]=ch,ch=getchar();
        scanf("%d",&q);
        for (int i=1;i<=q;i++){
            a[i].l=readint();
            a[i].r=readint();
            a[i].num=i;
        }
        sort(a+1,a+1+q,cmp);
        h=1;
        for (int i=1;i<=nn;i++){
            init();
            for (int j=i;j<=nn;j++){
                add(c[j]-'a'+1);
                while(i==a[h].l && j==a[h].r)
                    ans[a[h].num]=p-2,h++;
            }
        }
        for (int i=1;i<=q;i++){
            printf("%d\n",ans[i]);
        }
    }
//    fprintf(stderr,"%.3f",(double)clock()/CLOCKS_PER_SEC);
}