#include<bits/stdc++.h>
using namespace std;
#define ll long long int
#define MOD 1000000007
ll n,q,l,r,fact[100005],inv[100005];
string s;
ll cum[100005][26];
ll sq(ll x)
{
    return (x*x)%MOD;
}
ll bmod(ll a,ll b)
{
    if(b==0)
    return 1;
    else
    {
        if(b%2==0)
        return sq(bmod(a,b/2));
        else
        return (a*bmod(a,b-1))%MOD;
    }
}
int main()
{
    ios::sync_with_stdio(0);
    cin.tie(0);
    ll i,j,k;
    cin>>s;
    fact[0]=1;
    for(i=1;i<=100000;i++)
    {
        fact[i]=i*fact[i-1];
        fact[i]%=MOD;
    }
    for(i=0;i<=100000;i++)
    {
        inv[i]=bmod(fact[i],MOD-2);
    }
    n=s.size();
    cin>>q;
    s=" "+s;
    for(i=1;i<=n;i++)
    {
        for(j=0;j<26;j++)
        {
            cum[i][j]=cum[i-1][j];
        }
        cum[i][s[i]-'a']++;
    }
    while(q--)
    {
        ll evc,odc,cmp;
        evc=odc=cmp=0;
        cin>>l>>r;
        vector<ll>v;
        for(i=0;i<26;i++)
        {
            j=cum[r][i]-cum[l-1][i];
            if(j%2)
            odc++;
            cmp+=(j/2);
            v.push_back(j/2);
        }
        ll ans=0;
        if(odc)
        ans=odc;
        else
        ans=1;
        for(i=0;i<v.size();i++)
        {
            ans=ans*inv[v[i]];
            ans%=MOD;
        }
        ans=ans*fact[cmp];
        ans%=MOD;
        cout<<ans<<"\n";
    }
    return 0;
}