Cod sursa(job #2212011)

Utilizator georgitTreista Georgiana georgit Data 12 iunie 2018 21:02:06
Problema Medie Scor 100
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.45 kb
#include <fstream>

using namespace std;
int a[9005],fr[7005],frsum[14005];
int main()
{
    ifstream f("medie.in");
    ofstream g("medie.out");
    int n;
    f>>n;
    for(int i=1;i<=n;i++)
    {
        f>>a[i];
        fr[a[i]]++;
    }
    for(int i=1;i<n;i++)
        for(int j=i+1;j<=n;j++)
            frsum[a[i]+a[j]]++;
    int sol=0;
    for(int i=1;i<=n;i++)
        sol+=frsum[2*a[i]]-fr[a[i]]+1;
    g<<sol;
    return 0;
}