Pagini recente » Diferente pentru preoni-2008/runda-3 intre reviziile 2 si 1 | Diferente pentru teoria-jocurilor intre reviziile 33 si 7 | Diferente pentru utilizator/mariapascu intre reviziile 17 si 5 | Concursuri Virtuale | Cod sursa (job #655860)
Cod sursa(job #655860)
#include <fstream>
#define l 9005
using namespace std;
ifstream f("medie.in");
ofstream g("medie.out");
int i,n,a[l],fr[2*l],j,rez;
int main()
{
f>>n;
for(i=1; i<=n; i++) {
f>>a[i];
fr[a[i]]++;
}
for(i=1; i<=n; i++)
for(j=i+1; j<=n; j++)
if ((a[i]+a[j])%2==0) {
fr[a[i]]--,fr[a[j]]--;
rez+=fr[(a[i]+a[j])/2];
fr[a[i]]++,fr[a[j]]++;
}
g<<rez;
f.close();
g.close();
return 0;
}