#include<bits/stdc++.h>
using namespace std;
#define ll long long
#define MOD 1000000007

string s;
int q;
vector<int> ps[100005];
int l,r;

ll fakto[100005];

void pre()
{
	fakto[0]=1;
	for(int i=1;i<=100000;i++)
	{
		fakto[i]=i*fakto[i-1];
		fakto[i]%=MOD;
	}
	return;
}

ll fe(int x, int y)
{
	if(y==0) return 1;
	if(y==1) return x;
	ll ret=fe(x,y/2);
	ret*=ret;
	ret%=MOD;
	if(y%2==1) ret*=(ll)x;
	ret%=MOD;
	return ret;
}

int main()
{
	pre();
	vector<int> tmp;
	for(int i=0;i<26;i++) tmp.push_back(0);
	ps[0]=tmp;
	cin >> s;
	int id=0;
	for(int i=0;i<s.size();i++)
	{
		id++;
		ps[id]=ps[id-1];
		ps[id][s[i]-'a']++;
	}
	scanf("%d",&q);
	for(int i=1;i<=q;i++)
	{
		scanf("%d%d",&l,&r);
		ll ans=0;
		int dob=0;
		ll cur=1;
		for(int i=0;i<26;i++)
		{
			int tmp=ps[r][i]-ps[l-1][i];
			if(tmp%2==1) ans++;
			dob+=tmp/2;
			if(tmp/2>0) cur*=fe(fakto[tmp/2],MOD-2);
			cur%=MOD;
		}
		//cout << cur << endl;
		if(ans==0) ans=1;
		ans*=fakto[dob];
		ans%=MOD;
		ans*=cur;
		ans%=MOD;
		printf("%lld\n",ans);
	}
 	return 0;
}