Cod sursa(job #109293)
Utilizator | Bozianu Ana anna_bozianu | Data | 25 noiembrie 2007 10:02:29 |
---|---|---|---|
Problema | Pairs | Scor | 0 |
Compilator | cpp | Status | done |
Runda | preONI 2008, Runda 1, Clasa a 10-a | Marime | 0.39 kb |
#include<stdio.h>
long int n,x[100000],i,nr,j;
long int cmmdc(long int a, long int b)
{ if(!b) return a;
return cmmdc(b,a%b);
}
int main()
{ FILE *f=fopen("tunel.in","r"), *g=fopen("tunel.out","w");
fscanf(f,"%ld",&n);
for(i=1;i<=n;i++) fscanf(f,"ld",&x[i]);
for(i=1;i<n;i++)
for(j=i+1;j<=n;i++) if(cmmdc(x[i],x[j])==1) nr++;
fprintf(f,"%ld",nr);
fcloseall();
return 0;
}