Pagini recente » Cod sursa (job #3281946) | Cod sursa (job #2401249) | Cod sursa (job #1057444) | Cod sursa (job #74569) | Cod sursa (job #109430)
Cod sursa(job #109430)
#include<stdio.h>
#define in "pairs.in"
#define out "pairs.out"
long n,i,j,k,a[100000];
long cmmdc(long a,long b)
{
while(a!=b)
{
if(a>b)
a-=b;
else
b-=a;
}
return a;
}
int main()
{
freopen(in,"r",stdin);
freopen(out,"w",stdout);
scanf("%ld",&n);
for(i=1;i<=n;i++)
scanf("%ld",&a[i]);
for(i=1;i<=n;i++)
for(j=i+1;j<=n;j++)
if(cmmdc(a[i],a[j])==1)
k++;
printf("%ld\n",k);
return 0;
}