Cod sursa(job #918777)

Utilizator apopeid13Apopeid Alejandro apopeid13 Data 19 martie 2013 09:36:06
Problema Medie Scor 100
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.44 kb
#include <fstream>
#include <vector>
using namespace std;
int hsh[7001];
int sum, n, i, x[9001], j;
int main()
{
ifstream f("medie.in");
ofstream g("medie.out");
f>>n;
for(i=1; i<=n; i++)
{
f>>x[i];
}
for(i=1; i<=n; i++)
{
for(j=i+1; j<=n; j++)
{
if((x[i]+x[j])%2==0)
{
hsh[(x[i]+x[j])/2]++;
if(x[i]==(x[i]+x[j])/2)
sum--;
if(x[j]==(x[i]+x[j])/2)
sum--;
}
}
}
for(i=1; i<=n; i++)
{
sum+=hsh[x[i]];
}
g<<sum<<"\n";
}