#include <bits/stdc++.h>
#define lln long long int
#define MAX 1000000007
using namespace std;
string s="";

int answerQuery(int l, int r) {
    int hash[26]={0};
    l--;
    r--;
    for(lln i=l;i<=r;i++){
        hash[s[i]-'a']++;
    }
    lln c1=0,c2=0;
    for(lln i=0;i<26;i++){
        if(hash[i]%2==1){
            c1++;
        }else if(hash[i]%2==0&&hash[i]!=0){
            c2++;
        }
    }
  //  cout<<c1<<" "<<c2<<endl;
    if(c2==1){
        if(c1==0){
            return c2;
        }
        return c1;
    }else{
        if(c2==2){
            
        }else{
        c2=((c2%MAX)*((c2-1)%MAX))%MAX;
        c2/=2;}
    if(c1==0){
        return c2;
    }else{
        c2=((c2%MAX)*(c1%MAX))%MAX;
        return c2;
    }}
}

int main() {
    
    cin >> s;
    //initialize(s);
    int q;
    cin >> q;
    for(int a0 = 0; a0 < q; a0++){
        int l;
        int r;
        cin >> l >> r;
        int result = answerQuery(l, r);
        cout << result << endl;
    }
    return 0;
}