#include<bits/stdc++.h>
using namespace std;
using Int = long long;
template<typename T1,typename T2> inline void chmin(T1 &a,T2 b){if(a>b) a=b;}
template<typename T1,typename T2> inline void chmax(T1 &a,T2 b){if(a<b) a=b;}

//INSERT ABOVE HERE
signed main(){
  Int n;
  cin>>n;
  vector<Int> l(n);
  for(Int i=0;i<n;i++) cin>>l[i];
  
  vector<Int> cnt(n,0);
  auto sc=[&](Int x){return 50*l[x]+(500*l[x]/(8+2*++cnt[x]));};
  
  Int q;
  cin>>q;
  map<string, Int> lst,sum;
  map<string, vector<Int> > dat;
  for(Int i=0;i<q;i++){
    string s;
    char p;    
    cin>>s>>p;
    if(!dat.count(s)) dat[s]=vector<Int>(n,0);
    lst[s]=i;
    Int add=sc(p-'A');
    sum[s]+=add;
    dat[s][p-'A']=add;
  }

  vector<string> vs;
  for(auto p:lst) vs.emplace_back(p.first);

  auto cmp=
    [&](Int x,Int y)->Int{
      if(sum[vs[x]]!=sum[vs[y]])
        return sum[vs[x]]>sum[vs[y]];
      return lst[vs[x]]<lst[vs[y]];
    };
  
  Int m=vs.size();
  vector<Int> ord(m);
  iota(ord.begin(),ord.end(),0);  
  sort(ord.begin(),ord.end(),cmp);
  
  for(Int i=0;i<m;i++){
    cout<<i+1<<" "<<vs[ord[i]];
    for(Int j=0;j<n;j++) cout<<" "<<dat[vs[ord[i]]][j];
    cout<<" "<<sum[vs[ord[i]]]<<endl;
  }  
  return 0;
}