Pagini recente » Cod sursa (job #1665778) | Cod sursa (job #1447483) | Cod sursa (job #2900850) | Cod sursa (job #328269) | Cod sursa (job #109247)
Cod sursa(job #109247)
#include <stdio.h>
int n,v[100001],k;
int r;
int euclid (int a,int b)
{
if (b > 0)
return 0 + euclid (b,a%b);
else
return a;
}
int prim(int a,int b)
{
r = euclid (a,b);
if (r == 1)
return 1;
else
return 0;
}
int main ()
{
int i,j;
freopen("pairs.in","r",stdin);
scanf("%d",&n);
for (i = 1;i <= n; ++i)
scanf("%d",&v[i]);
for (i = 1;i < n; ++i)
for (j = i+1; j <= n; ++j)
if (prim(v[i],v[j]))
k++;
freopen("pairs.out","w"stdout);
printf("%d",k);
return 0;
}