#include <fstream.h>

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

int a[9001],v[7001],n,NrSol;

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

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

void search ()
{ for (int i=1; i<=n; i++)
   for (int j=1; j<=n; j++)
    for (int k=j+1; k<=n; k++)
      if ((a[i]<<1==a[j]+a[k]) && (i!=j) && (i!=k))
	  v[a[i]]++;
  for (int l=1; l<=n; l++)
   if (v[l]) NrSol+=v[l];
}

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