Mai intai trebuie sa te autentifici.
Cod sursa(job #249052)
| Utilizator | Data | 27 ianuarie 2009 13:47:52 | |
|---|---|---|---|
| Problema | Pairs | Scor | 0 |
| Compilator | cpp | Status | done |
| Runda | Arhiva de probleme | Marime | 0.74 kb |
#include<fstream.h>
#define NN 10000
long a[ NN ];
int divizori(long x, long y)
{int ok=1; long d;
if (x%y==0 || y%x==0) return 0;
else
if (x<y)
{ d=2;
while (d<=x/2 && ok)
{if (x%d==0 && y%d==0) ok=0; d++;}
}
else
{ d=2;
while (d<=y/2 && ok)
{if (x%d==0 && y%d==0) ok=0; d++;}
}
return ok;
}
int main()
{ long i,j,n,s=0;
fstream f,g;
ifstream("pairs.in");
ofstream("pairs.out");
f>>n;
for (i = 1; i <= n; i ++){
f>>a[i];
}
for (i=1;i<=n-1;++i)
for (j=i+1;j<=n;++j)
if (a[i]%2==0 && a[j]%2==1 ||a[i]%2==1 && a[j]%2==0 ||a[i]%2==1 && a[j]%2==1)
{
s=s+divizori(a[i],a[j]); }
g<<s ;
g.close();
f.close();
return 0;
}