Cod sursa(job #1105290)
Utilizator | Data | 11 februarie 2014 18:02:32 | |
---|---|---|---|
Problema | Medie | Scor | 10 |
Compilator | cpp | Status | done |
Runda | Arhiva de probleme | Marime | 0.42 kb |
#include <iostream>
#include <fstream>
using namespace std;
ifstream f("medie.in");
ofstream g("medie.out");
int n,v[9005],s[7005],ap[7005],sol;
int main()
{ int i,j;
f>>n;
for(i=1;i<=n;i++)
{f>>v[i];
ap[v[i]]++;
}
for(i=1;i<=n;i++)
for(j=i+1;j<=n;j++)
s[v[i]+v[j]]++;
for(i=1;i<=n;i++)
sol+=s[v[i]*2]-(ap[v[i]]-1)*(ap[v[i]]>1);
g<<sol;
return 0;
}