#include <stdio.h>

signed long long tort;
int freq[7000],med[7000],sir[9000],n;

void cit(FILE *f)
{
	int i;
	fscanf(f,"%i",&n);
	for(i=0;i<n;i++)
		fscanf(f,"%i",&sir[i]);
}

void rez()
{
	int i,j;
	for(i=0;i<n;i++)
	{
		freq[sir[i]]++;
		for(j=i+1;j<n;j++)
			if(!((sir[i]+sir[j])%2))
				med[(sir[i]+sir[j])/2]++;
	}
}

int main()
{
	int i;
	cit(fopen("medie.in","r"));
	rez();
	for(i=0;i<n;i++)
		tort+=med[sir[i]]-freq[sir[i]]+1;
	fprintf(fopen("medie.out","w"),"%I64i\n",tort);
	return 0;
}