Cod sursa(job #2797737)

Utilizator David_PildDavid Pild David_Pild Data 10 noiembrie 2021 15:29:46
Problema Medie Scor 60
Compilator cpp-64 Status done
Runda Arhiva de probleme Marime 0.53 kb
#include <fstream>

using namespace std;

ifstream fin("medie.in");
ofstream fout("medie.out");

int f[7001],f1[7001],v[9001];
int main()
{
    int n;
    fin>>n;
    for(int i=1;i<=n;i++){
        fin>>v[i];
        f[v[i]]++;
    }
    for(int i=1;i<n;i++){
        for(int j=i+1;j<=n;j++){
            if((v[i]+v[j])%2==0) f1[(v[i]+v[j])/2]++;
        }
    }
    int nr=0;
    for(int i=1;i<=n;i++){
        if(f1[v[i]]){
            nr=nr+f1[v[i]]-f[v[i]]+1;
        }
    }
    fout<<nr;
    return 0;
}