Pagini recente » Profil BuddYe | Monitorul de evaluare | Rating Pavel Pavel (PavelSavchenkov) | Cod sursa (job #118056) | Cod sursa (job #223668)
Cod sursa(job #223668)
#include <stdio.h>
FILE *f,*g;
long n,a,i,j;
int divcom(int nr,int nr2)
{ int x,r,y;
x=nr2;
/* if (x>nr) {r=x%nr;y=nr;}
else {r=nr%x;y=x;}*/
while (r!=0)
{
if(x>nr)
{
r=x%nr;
x=nr;
y=nr;
nr=r;
}
else
{
r=nr%x;
nr=x;
y=x;
x=r;
}
}
return y;
}
int main()
{
f=fopen("fractii.in","r");
g=fopen("fractii.out","w");
fscanf(f,"%d",&n);
a=n*n;
for (i=2;i<=n;i++)
for (j=2;j<=n;j++)
if (i==j || divcom(i,j)!=1) a--;
fprintf(g,"%d ",a);
fcloseall();
return 0;
}