#include<fstream>
using namespace std;

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