Pagini recente » Cod sursa (job #2137002) | Cod sursa (job #1169829) | Cod sursa (job #245757) | Cod sursa (job #781853) | Cod sursa (job #111557)
Cod sursa(job #111557)
#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()
{
long long v[100001];
register long i,j,n,k=0;
FILE *fi,*fo;
fi=fopen("pairs.in","r");
fo=fopen("pairs.out","w");
fscanf(fi,"%ld",&n);
for(i=0;i<n;i++)fscanf(fi,"%ld",&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,"%ld\n",k);
return 0;}