#include <fstream.h>

ifstream f("medie.in");
ofstream g("medie.out");

int a[9002],v[7002],n,NrSol;

void citire ()
{ f>>n; 
  for (int i=1; i<=n; i++)
   f>>a[i];
  f.close ();
}

void search ()
{  int i,j,aux;
   #define div2(x) (!((x)&1)) //verifica daca x e divizibil cu 2
   for (i=1; i<n; i++)
    { 
      for (j=i+1; j<=n; j++)
       if (div2(aux=a[i]+a[j]))
        ++v[aux>>1];
    }
 
    for (i=1; i<=n; i++) 
     if (v[a[i]]) NrSol+=(v[a[i]]);
}

void scrie ()
{ g<<NrSol;
  g.close ();
}

int main ()
{ citire ();
  search ();
  scrie ();
  return 0;
}