Cod sursa(job #930100)

Utilizator ArmandNMArmand Nicolicioiu ArmandNM Data 27 martie 2013 13:54:57
Problema Medie Scor 100
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.86 kb
#include <cmath>
#include <fstream>
using namespace std;
ifstream f("medie.in");
ofstream g("medie.out");

int n,i,j,a[9010],v[7010],app[9010],x;
long sum;
double aux;

int main()
{
    f>>n;
    for (i=1;i<=n;i++)
    {
        f>>a[i];
        app[a[i]]++;
    }
    for (i=1;i<=n;i++)
    {
        for (j=i+1;j<=n;j++)
        {
            //aux=(double(a[i])+double(a[j]))>>1;
                        //g<<aux<<" "<<floor(aux)<<endl;
            //if (aux==floor(aux))
               // v[(a[i]+a[j])/2]++;
            if ((a[i]+a[j])>>1 == (a[i]+a[j]+1)>>1)
                v[(a[i]+a[j])/2]++;
        }
    }
    //g<<"TUESTIMIRCEA?"<<endl;
    for (i=1;i<=n;i++)
    {
        x=a[i];
        //g<<v[x]<<" ";
        if (v[x]!=0)
            sum=sum+v[x]-app[x]+1;
    }
    g<<sum;
    f.close();
    g.close();
    return 0;
}