Cod sursa(job #152374)

Utilizator MariusMarius Stroe Marius Data 9 martie 2008 13:35:43
Problema Pedefe Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 1.5 kb
#include <fstream>
#include <algorithm>

using namespace std;

const char iname[] = "pedefe.in";
const char oname[] = "pedefe.out";

#define FOR(i, a, b) for (int i = (a); i <= (b); ++ i)
#define MAXN  505
#define MAXV  505
#define modulo 666013

int A[MAXN], B[MAXN], C[MAXN];

int Cnt[2][MAXN][MAXN];

int main(void)
{
	ifstream fin(iname);

	int n, m, p;

	fin >> n >> m >> p;
	FOR (i, 1, n) 
		fin >> A[i];
	FOR (i, 1, m) 
		fin >> B[i];
	FOR (i, 1, p) 
		fin >> C[i];

	fin.close();

	int s = 0;

	Cnt[s][0][0] = 1;

	FOR (i, 1, n) 
	{
		FOR (j, 1, m) if (A[i] == B[j])
		{
			FOR (p, 0, i-1) if (A[p] <= A[i])
				FOR (q, 0, j-1)
					if ((Cnt[s][i][j] += Cnt[s][p][q]) >= modulo)
						Cnt[s][i][j] -= modulo;
		}
	}

	FOR (k, 1, p) 
	{
		s = k & 1;
		memset(Cnt[s], 0, sizeof(Cnt[s]));
		
		FOR (i, 1, n)
		{
			FOR (j, 1, m) if (A[i] == B[j]) 
			{
				if (A[i] == C[k]) 
				{
					FOR (p, 0, i-1) if (A[p] <= A[i])
						FOR (q, 0, j-1)
							if ((Cnt[s][i][j] += Cnt[s ^ 1][p][q]) >= modulo)
								Cnt[s][i][j] -= modulo;
				} else {
					FOR (p, 0, i-1) if (A[p] <= A[i])
						FOR (q, 0, j-1)
							if ((Cnt[s][i][j] += Cnt[s][p][q]) >= modulo)
								Cnt[s][i][j] -= modulo;
				}
			}
		}
	}

	int ret = 0;

	FOR (i, 1, n) FOR (j, 1, m) 
		if (A[i] == B[j] && ((p && A[i] == C[p]) || !p)) 
			if ((ret += Cnt[p & 1][i][j]) >= modulo)
				ret -= modulo;

	ofstream fout(oname); 	fout << ret << '\n';   fout.close();

	return 0;
}