#include<bits/stdc++.h>
#define rep(i,a,b) for(int i=a;i<b;i++)
#define rrep(i,a,b) for(int i=a;i>=b;i--)
#define fore(i,a) for(auto &i:a)
#define all(x) (x).begin(),(x).end()
#pragma GCC optimize ("-O3")
using namespace std; void _main(); int main() { cin.tie(0); ios::sync_with_stdio(false); _main(); }
typedef long long ll; const int inf = INT_MAX / 2; const ll infl = 1LL << 60;
template<class T>bool chmax(T &a, const T &b) { if (a<b) { a = b; return 1; } return 0; }
template<class T>bool chmin(T &a, const T &b) { if (b<a) { a = b; return 1; } return 0; }
//---------------------------------------------------------------------------------------------------
/*---------------------------------------------------------------------------------------------------
　　　　　　　　　　　 ∧＿∧  
　　　　　 ∧＿∧ 　（´<_｀ ）　 Welcome to My Coding Space!
　　　　 （ ´_ゝ`）　/　 ⌒i     
　　　　／　　　＼　 　  |　|     
　　　 /　　 /￣￣￣￣/　　|  
　 ＿_(__ﾆつ/　    ＿/ .| .|＿＿＿＿  
　 　　　＼/＿＿＿＿/　（u　⊃  
---------------------------------------------------------------------------------------------------*/





string str[5]; int coin[5];
int N[3];
map<string, int> A[3];
double ans1;
ll ans2[5];
//---------------------------------------------------------------------------------------------------
void _main() {
    rep(i, 0, 5) cin >> str[i] >> coin[i];
    rep(i, 0, 3) {
        cin >> N[i];
        rep(j, 0, N[i]) {
            string s; cin >> s;
            A[i][s]++;
        }
    }
    
    rep(i, 0, 5) {
        string s = str[i];
        ans2[i] = 5LL * A[0][s] * A[1][s] * A[2][s];
        ans1 += ans2[i] * coin[i];
    }

    rep(i, 0, 3) ans1 /= N[i];

    printf("%.10f\n", ans1);
    rep(i, 0, 5) printf("%lld\n", ans2[i]);
}