#include <bits/stdc++.h>


#define rep(x,to) for(int (x)=0;(x)<(to);(x)++)
#define all(c) (c).begin(),(c).end()
#define sz(v) (int)(v).size()
#define dnmin(a,b) (a)=min((a),(b))

using namespace std;
typedef vector<int> VI;
typedef pair<int, int> pii;

struct Bitree {
	typedef int btT;
	vector<btT> bv;
	Bitree(int n) : bv(n + 3) {}
	btT sum(int i) {
		btT res=0; for(i++; i>0; i -= i & -i) res += bv[i]; return res;
	}
	btT sum(int a, int b) {return sum(b) - (a? sum(a-1): 0);}
	void add(int i, btT x){for(i++; i<(int)bv.size(); i += i & -i) bv[i] += x; }
};


int main(){
 
	int n, t, mno=0;
	cin >>n;
	VI hs(n);
	unordered_map<string, VI> mp;
	Bitree bta(600*27);
	vector<VI> va(600*27);
	rep(i,n) cin >>hs[i];
	cin >> t;
	VI nos(n);
	vector<string> rcv(100010);
	rep(i, t){
		string s; char a;
		cin >> s >> a;
		if(!mp.count(s)){
			mp[s] = VI{ 0,0, ++mno};
			rcv[mp[s][2]] = s;
		}
		if(a != '?'){
			if(mp[s][0] !=0){
				bta.add(mp[s][0], -1);
			}
			mp[s][1] = i+1;
			int mz= a-'A';
			mp[s][0] += 50 * hs[mz] + (500 * hs[mz]) / (8 + 2* (++nos[mz]));
			bta.add(mp[s][0], 1);
			va[mp[s][0]].push_back(mp[s][2]);
		}else{
			int ans = bta.sum( mp[s][0] + 1, 600*27);
			auto& wv = va[mp[s][0]];
			int delct=0;
			rep(j,sz(wv)){
				if(wv[j] ==-1){ delct++; continue;}
				if(mp[rcv[wv[j]]][0] != mp[s][0]){
					delct++; wv[j] = -1;
					continue;
				}
				if(wv[j] == mp[s][2]) break;
				else ans++;
			}
			cout << ans + 1 <<"\n";
		}
	}
	
	return 0;
}