#include<cstring>
#include<iostream>
using namespace std;
const int mod=9973;
char str[100010];
int a[100010],b[100010];

void gcd(int a,int b,int &d,int &x,int &y){
    if(!b){
        d=a;x=1;y=0;
    }else{
        gcd(b,a%b,d,y,x);
        y-=x*(a/b);
    }
}
int inv(int a,int n){
    int d,x,y;
    gcd(a,n,d,x,y);
    return d==1?(x+n)%n:-1;
}
int main(){
    int n;
    while(scanf("%d\n",&n)!=EOF){
        scanf("%s",str);
        int len=strlen(str);
        for(int i=1;i<=len;i++){
            a[i]=str[i-1]-28;
        }
        b[0]=1;
        for(int i=1;i<=len;i++){
            b[i]=a[i]*b[i-1]%mod;
        }
        int x,y;
        for(int i=0;i<n;i++){
            cin>>x>>y;
            cout<<(b[y]*inv(b[x-1],mod)%mod)<<endl;
        }
    }
    return 0;
}