Cod sursa(job #73168)

Utilizator slayer4uVictor Popescu slayer4u Data 17 iulie 2007 11:28:12
Problema Oite Scor 40
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.38 kb
#include<stdio.h>
int NR,nr[1000001],i,j,d,c,l,x[1025],n;
int main()
{
	freopen ("oite.in","rt",stdin);
	freopen ("oite.out","wt",stdout);

	scanf("%ld %ld",&n,&l);

	for (i=1;i<=n;i++)
		scanf("%ld",&x[i]);

	for (c=1;c<n;c++)
	{
		for (d=c+1;d<=n;d++)
		{
			NR+=nr[l-x[c]-x[d]];
		}
		for (d=1;d<=c-1;d++)
			nr[x[d]+x[c]]++;
	}
	printf("%ld\n",NR);
	return 0;
}