Cod sursa(job #644696)

Utilizator maritimCristian Lambru maritim Data 7 decembrie 2011 15:04:47
Problema Medie Scor 100
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.6 kb
#include<stdio.h>
#include<fstream>
using namespace std;

ifstream f("medie.in");
ofstream g("medie.out");

#define MaxN 9010
#define MaxV 14100
#define MaxP 3

int N,MAX,A[MaxN],V[MaxP][MaxV];

void citire(void)
{
	f >> N;
	for(int i=1;i<=N;i++)
		f >> A[i];
}

void Punctare(void)
{
	for(int i=1;i<=N;i++)
	{
		for(int j=1;j<=7000;j++)
			if(V[0][j])
				V[1][j+A[i]] += V[0][j];
		V[0][A[i]] ++;
	}
}

void Numarare(void)
{
	for(int i=1;i<=N;i++)
		MAX += V[1][A[i]<<1]-V[0][A[i]]+1;
}

int main()
{
	citire();
	Punctare();
	Numarare();
	g << MAX;
	
	return 0;
}