#include <cstdio>
#include <algorithm>
#include <cstdlib>
#include <cstring>
#include <cmath>
#include <climits>

using namespace std;

const int MOD=9973;
const int MX=100005;
int a[MX],inva[MX];
char s[MX];
int inv[MOD];

int powmod(int a,int b=MOD-2){
    int ans = 1;
    while(b){ if(b&1) ans=ans*a%MOD; a=a*a%MOD; b>>=1; }
    return ans;
}

int main() {
    int n;
    for(int i=1;i<MOD;++i)inv[i]=powmod(i);
    while(scanf("%d%s",&n,s+1)==2) {
        int L = strlen(s+1);
        inva[0]=a[0]=1;
        for(int i=1;i<=L;++i){
            a[i]=a[i-1]*(s[i]-28)%MOD;
            inva[i]=inv[a[i]];
        }
        for(int j=0;j<n;++j){
            int l,r;scanf("%d%d",&l,&r);
            printf("%d\n",(a[r]*inva[l-1])%MOD);
        }

    }
    return 0;
}