#include<bits/stdc++.h>

#define BASE 2

#define MOD 1000000007

#define LL long long

#define MAXN 300005

using namespace std;

int hash[MAXN];

char s[MAXN];

int qpow(int base,int n){

    LL ans=;

    while(n){

        if(n&)ans=(ans*base)%MOD;

        base=(1LL*base*base)%MOD;

        n>>=;

    }

    return ans;

}

int hash_ask(int l,int r){

    if(l==)return hash[r];

    else{

        int ans=(1LL*hash[r]-hash[l-]+MOD)%MOD;

        int rev=qpow(BASE,l);

        rev=qpow(rev,MOD-);

        ans=1LL*ans*rev%MOD;

        return ans;

    }

}

int hash_init(int len){

    hash[]=s[];

    for(int i=;i<len;i++){

        hash[i]=(0LL+hash[i-]+s[i]*qpow(BASE,i)%MOD)%MOD;

    }

}

int main(){

    scanf("%s",s);

    hash_init(strlen(s));

    while(){

        int l,r;

        scanf("%d %d",&l,&r);

        printf("%d\n",hash_ask(l,r));

    }

}