Cod sursa(job #290641)
Utilizator | Antohi Bogdan bog29 | Data | 28 martie 2009 14:43:14 |
---|---|---|---|
Problema | Pairs | Scor | 20 |
Compilator | cpp | Status | done |
Runda | Arhiva de probleme | Marime | 0.4 kb |
#include<fstream.h>
#define dmax 100000
ifstream in("pairs.in");
ofstream out("pairs.out");
int x[dmax],n,k;
int cmmdc(int x,int y)
{ if(x%y==0)return y;
else return cmmdc(y,x%y);
}
int main()
{ int i,j;
in>>n;
for(i=1;i<=n;i++)
in>>x[i];
in.close();
for(i=1;i<=n;i++)
for(j=i;j<=n;j++)
if(x[i]!=x[j])
if(cmmdc(x[i],x[j])==1)
k++;
out<<k;
out.close();
return 0;
}