#include<stdio.h>
char A[32];
long long int d[32][32];
char s[3003];
long long int a[3003][3003];
long long int cnt[32];
long long int ans[3003];
int main()
{
	scanf("%s", A);
	long long int l;
	for (l = 0; A[l] != '\0'; l++);
	long long int i, j, k;
	for (i = 0; i < l; i++)
		for (j = 0; j < l; j++)
			scanf("%lld", &d[i][j]);
	long long int n, m;
	scanf("%lld %lld", &n, &m);
	for (i = 0; i < n; i++)
	{
		scanf("%s", s);
		for (j = 0; j < m; j++)
		{
			for (k = 0; A[k] != s[j]; k++);
			a[i][j] = k;
		}
	}
	for (i = 0; i < n; i++)
		ans[i] = 0;
	for (j = 0; j < m; j++)
	{
		for (i = 0; i < 32; i++)
			cnt[i] = 0;
		for (i = 0; i < n; i++)
			cnt[a[i][j]]++;
		for (i = 0; i < n; i++)
			for (k = 0; k < l; k++)
				ans[i] += d[a[i][j]][k] * cnt[k];
	}
	for (i = 0; i < n; i++)
		printf("%lld\n", ans[i]);
	return 0;
}