Cod sursa(job #60494)

Utilizator crawlerPuni Andrei Paul crawler Data 14 mai 2007 20:56:37
Problema Medie Scor 100
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.53 kb
#include <cstdio>

using namespace std;

int v[9192], nr[8192<<1];

int main()
 {
  freopen("medie.in","r",stdin);
  freopen("medie.out","w",stdout);

  int i,j,n,tmp;
  long long sol = 0;

  scanf("%d",&n);
  
  for(i=0;i<n;++i)
   scanf("%d",v+i);
   
  for(i=0;i<n;++i)
   for(j=i+1;j<n;++j)
    {
     tmp = v[i]+v[j];
     if(tmp == v[i]<<1)
       --sol;
     ++nr[tmp];
   }

  for(i=0;i<n;++i)
   {
    sol += nr[v[i]<<1];
    --nr[v[i]<<1];
   }

  printf("%lld\n",sol);

  return 0;
 }