Pagini recente » Borderou de evaluare (job #183772) | Cod sursa (job #929962) | Cod sursa (job #2117819) | Cod sursa (job #1960987) | Cod sursa (job #2411)
Cod sursa(job #2411)
#include <stdio.h>
long int n,i,j,nr;
FILE *f;
void Read()
{f=fopen("fractii.in","r");
fscanf(f,"%ld",&n);
fclose(f);
}
int cmmdc(long int i,long int j)
{long int r;
r=i%j;
while(r!=0)
{i=j;
j=r;
r=i%j;
}
return j;
}
long int Numar()
{for(i=1;i<=n;i++)
for(j=1;j<=n;j++)
if(cmmdc(i,j)==1)nr++;
return nr;
}
void Write()
{f=fopen("fractii.out","w");
fprintf(f,"%ld",Numar());
fclose(f);
}
void main()
{Read();
Write();
}