Cod sursa(job #112360)
| Utilizator | Data | 4 decembrie 2007 20:41:37 | |
|---|---|---|---|
| Problema | Pairs | Scor | 0 |
| Compilator | cpp | Status | done |
| Runda | Arhiva de probleme | Marime | 0.51 kb |
#include<stdio.h>
int cmdc(register long long a,register long long b)
{ register long long r;
while(a)
{r=b%a;b=a;a=r;
}
return b;
}
int main()
{
register long i,j,n,k=0;
FILE *fi,*fo;
fi=fopen("pairs.in","r");
fo=fopen("pairs.out","w");
fscanf(fi,"%ld",&n);
long long v[n+2];
for(i=0;i<n;i++)fscanf(fi,"%LL",&v[i]);
fclose(fi);
for(i=0;i<n-1;i++)
for(j=i+1;j<n;j++)
if(cmdc(v[i],v[j])==1)k++;
fprintf(fo,"%LL\n",k);
return 0;}
