#include<fstream>
using namespace std;

int n,  f[7001], tot;
int main()
{
	ifstream fin("medie.in");
	ofstream fout("medie.out");
	fin >> n;
	for (int i = 1, aux; i <= n; ++i)
	{
		fin >> aux;
		++f[aux];
	}
	for (int i = 1; i < 7000; ++i)
		if (f[i])
			for (int j = i + 1; j <= 7000; ++j)
				if (f[j])
				{
					--f[i], --f[j];
					if ((i + j) % 2 == 0)
						tot += f[(i + j) / 2];
					++f[i], ++ f[j];
				}
	fout << tot;
}