#include <bits/stdc++.h>
using namespace std;
long long n,q,sa[50005],sc[50005],sg[50005],st[50005],l,r,i;
string ss;
char s[500005];
map<char,int> order;

struct dna {
    char c;
    long long x;
} cnt[10];

bool cmp(dna p, dna q) {
    if (p.x==q.x) {
        return order[p.c]<order[q.c];
    }
    return p.x>q.x;
}

int main() {
    order['A']=1;
    order['T']=2;
    order['G']=3;
    order['C']=4;
    cin >> ss;
    n=ss.length();
    for (i=1;i<=n;i++) {
        s[i]=ss[i-1];
    }
    for (i=1;i<=n;i++) {
        sa[i]=sa[i-1];
        sc[i]=sc[i-1];
        sg[i]=sg[i-1];
        st[i]=st[i-1];
        if (s[i]=='A') {
            sa[i]++;
        }
        if (s[i]=='C') {
            sc[i]++;
        }
        if (s[i]=='G') {
            sg[i]++;
        }
        if (s[i]=='T') {
            st[i]++;
        }
    }
    cin >> q;
    while(q--) {
        cin >> l >> r;
        cnt[1].x=sa[r]-sa[l-1];
        cnt[2].x=sc[r]-sc[l-1];
        cnt[3].x=sg[r]-sg[l-1];
        cnt[4].x=st[r]-st[l-1];
        cnt[1].c='A';
        cnt[2].c='C';
        cnt[3].c='G';
        cnt[4].c='T';
        sort(cnt+1,cnt+5,cmp);
        for (i=1;i<=4;i++) {
            cout << cnt[i].c;
        }
        cout << endl;
    }
}