Pagini recente » Cod sursa (job #1647265) | Cod sursa (job #844300) | Cod sursa (job #2957857) | Cod sursa (job #959832) | Cod sursa (job #110562)
Cod sursa(job #110562)
#include <stdio.h>
#include <math.h>
FILE *f,*g;
int i,j,m,x;
long n,v[10000],k;
int main()
{f=fopen("pairs.in","r");
g=fopen("pairs.out","w");
fscanf(f,"%ld",&n);
for (i=0;i<n;i++)
fscanf(f,"%ld",&v[i]);
for (i=0;i<n-1;i++)
for (j=i+1;j<n;j++)
{x=0;
if (v[i]>v[j])
{for (k=2;k<=sqrt(v[j])+1;k++)
if (v[i]%k==0 && v[j]%k==0) x=1;}
if (v[i]<v[j])
{for (k=2;k<=sqrt(v[i])+1;k++)
if (v[i]%k==0 && v[j]%k==0) x=1;}
if (v[i]==2)
if (v[j]%2==0) x=1;
if (v[i]==3)
if (v[j]%3==0) x=1;
if (v[j]==2)
if (v[i]%2==0) x=1;
if (v[j]==3)
if (v[i]%3==0) x=1;
if (x==0) m++;}
fprintf(g,"%d",m);
fcloseall();
return 0;
}