#include<bits/stdc++.h>
using namespace std;
int main(){
	long long int q,i,j,h=0;
	string s;
	cin>>s;
	cin>>q;
	while(q--){
		long long int l,r,a[26]={0},u=0,t=0;
		cin>>l>>r;
		h=0;
		for(i=l-1;i<r;++i){
			a[s[i]-'a']++;
		}
		for(j=0;j<26;++j){
			if(a[j]%2!=0){
				h++;
			}
			else{
				if(a[j]!=0)
				u++;
			}
		}
		//cout<<"u="<<u<<endl;
		//cout<<"h="<<h<<endl;
		t=u-1;
		while(t!=0){
			u*=t;
			u%=1000000007;
			t--;
		}
		if(h==0){
			cout<<u<<endl;
		}
		else{
			h*=u;
			h%=1000000007;
			cout<<h<<endl;
		}
	}
	return 0;
}