#include<iostream>
#include<string.h>
using namespace std;
const int mod=9973;
const int N=123456;
char s[N];
int a[N];
void extend_Euclid(int a,int b,int &x,int &y)
{
    if(b==0)
    {
        x=1;
        y=0;
        return;
    }
    extend_Euclid(b,a%b,x,y);
    int t=x;
    x=y;
    y=t-a/b*y;
}

int main()
{
    int n,p,q;
    while(cin>>n)
    {
        scanf("%s",s);
        int len=strlen(s);
        a[0]=s[0]-28;
        for(int i=1;i<len;i++)
            a[i]=(s[i]-28)*a[i-1]%mod;
        for(int i=0;i<n;i++)
        {
            cin>>p>>q;
            if(p==1)
                cout<<a[q-1]<<endl;
            else
            {
                int x,y;
                extend_Euclid(a[p-2],mod,x,y);
                cout<<(a[q-1]*((x%mod+mod)%mod))%mod<<endl;
            }
        }
    }
    return 0;
}