Cod sursa(job #1087500)

Utilizator httpsLup Vasile https Data 19 ianuarie 2014 15:04:20
Problema Medie Scor 20
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.6 kb
#include <iostream>
#include <fstream>
using namespace std;

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

#define cout g
int i,j,a[9001],v[14003],frecvent[7001],d,n,maxx;
long long nr;
int main()
{
   f>>n;
   for(i=1;i<=n;i++) f>>a[i];
   for(i=1;i<=n;i++)
   {
       ++frecvent[a[i]];
        maxx=max(maxx,a[i]);
       for(j=i+1;j<=n;j++)
   {
       d=a[i]+a[j];
       ++v[d];

   }
   }
    for(i=1;i<=maxx;++i)
        if (v[2*a[i]])
        {
            nr=nr+v[2*a[i]]*frecvent[a[i]]-frecvent[a[i]]*(frecvent[a[i]]-1);
        }
        cout<<nr;
    return 0;
}