#include <stdio.h>

long int a[150], b[150], k, i;
long int lasta[150];

long int geta2(long int ind, long int k) 
{
	if (ind < k) return a[ind];
	return lasta[(ind-k) % k];
}

int main()
{
	scanf("%li", &k);
	if ( k ) {
		for (int j = 0; j < k; j++) scanf("%li", &a[j]);
		for (int j = 0; j < k; j++) scanf("%li", &b[j]);
		scanf("%li\n",&i);
	}

	while ( k )
	{
		long int suma;
		if (i<k) suma = a[i];
		else {
			for (long int j=k; j<=i; j++)
			{
				suma = 0;
				for(long int l=1; l<=k; l++)
				{
					suma += geta2(j-l,k)*b[l-1];
					suma %= 10000;
				}
				lasta[(j-k) % k] = suma;
			}
			suma = lasta[(i-k) % k];
		}

		printf("%li\n",suma);
		
		scanf("%li", &k);
		if ( k ) {
		  for (int j = 0; j < k; j++) scanf("%li", &a[j]);
		  for (int j = 0; j < k; j++) scanf("%li", &b[j]);
		  scanf("%li\n",&i);
		}
	}
	
	return 0;
}