using namespace std;
#include <fstream>

int a[10000],v[10000], n ;

int main(){
	ifstream fin("medie.in");
	fin>>n;
	for(int i=1;i<=n;++i)
		fin>>a[i];
	for(int i=1;i<=n;++i)
		for(int j=i+1;j<=n;++j)
			if((a[i]+a[j])%2 ==0){
				++v[(a[i]+a[j])/2];
			}
	int s=0;
	for(int i=1;i<=n;++i){
		s+=v[a[i]];
		int c=0;
		for(int j=1;j<=n;++j)
			if(a[j]==a[i])
				c++;
		if(c>1){
			s -= c*(c-1)/2;
			s += (c-1)*(c-2)/2;
		}
	}
	ofstream fout("medie.out");
	fout<<s<<endl;
	return 0;
}