Cod sursa(job #571648)

Utilizator bogfodorBogdan Fodor bogfodor Data 4 aprilie 2011 17:36:44
Problema Medie Scor 60
Compilator cpp Status done
Runda brasov_11_jr Marime 0.6 kb
#include <cstdio>
#define Lmax 9005
#define Vmax 7005

using namespace std;

FILE *fin=freopen("medie.in","r",stdin);
FILE *fout=freopen("medie.out","w",stdout);

int a[Lmax],n;
int b[Vmax];

void citire()
{
    scanf("%d",&n);
    for(int i=0;i<n;++i)
    {
        scanf("%d",&a[i]);
        for(int j=i-1;j>=0;j--)
            if((a[i]+a[j])%2==0)
                b[(a[i]+a[j])/2]++;
        b[a[i]]--;
    }
}

void afisare()
{
    int s=0;
    for(int i=0;i<n;i++)
        s+=b[a[i]]+1;
    printf("%d\n",s);
}

int main()
{
    citire();
    afisare();
    return 0;
}