Cod sursa(job #307150)
| Utilizator | Data | 23 aprilie 2009 12:48:13 | |
|---|---|---|---|
| Problema | Pairs | Scor | 20 |
| Compilator | cpp | Status | done |
| Runda | Arhiva de probleme | Marime | 0.38 kb |
#include<stdio.h>
FILE *f=fopen("pairs.in","r");
FILE *g=fopen("pairs.out","w");
int n,i,j,p,a[1000],b[1000];
int cmmdc(int a,int b)
{ if(b==0) return a;
return cmmdc(b,a%b);
}
int main()
{
fscanf(f,"%d",&n);
for(i=1;i<=n;i++) fscanf(f,"%d",&a[i]);
for(i=1;i<=n;i++)
for(j=1;j<=n&&i!=j;j++) if(cmmdc(a[i],a[j])==1) p++;
fprintf(g,"%d",p);
fclose(f);
fclose(g);
return 0;
}