Pagini recente » Cod sursa (job #314033) | Cod sursa (job #2134805) | Cod sursa (job #26990) | Cod sursa (job #97950) | Cod sursa (job #788476)
Cod sursa(job #788476)
#include<stdio.h>
#define SWAP(a,b) long t;t=a;a=b;b=t;
long prime(long a,long b)
{
long r;
if(a<b) {SWAP(a,b);}
r=a%b;
while(r)
{
a=b;
b=r;
r=a%b;
}
if(b==1) return 1;
else return 0;
}
long fractii(long n)
{
long i,j, k=0;
for(i=1;i<=n;i++)
for(j=1;j<=n;j++)
if(prime(i,j)) k++;
return k;
}
int main()
{
long N;
FILE *f=fopen("fractii.in","r");
FILE *g=fopen("fractii.out","w");
fscanf(f,"%d",&N);
if(N>=1 && N<=1000000)
fprintf(g,"%ld",fractii(N));
fclose(f);
fclose(g);
return 0;
}