Cod sursa(job #348787)
| Utilizator |  Laurentiu Capatina lau08 |
Data | 16 septembrie 2009 22:00:33 |
|---|---|---|---|
| Problema | Fractii | Scor | 10 |
| Compilator | cpp | Status | done |
| Runda | Arhiva de probleme | Marime | 0.29 kb |
#include<stdio.h>
FILE *f=fopen("fractii.in","r");
FILE *g=fopen("fractii.out","w");
long n,x,y,a,b,r;
int k;
int main()
{fscanf(f,"%ld",&n);
for(x=1;x<=n;x++)
for(y=1;y<=n;y++)
{a=x;b=y;
while(b!=0)
{r=a%b;
a=b;
b=r;
}
if(a==1)k++;
}
fprintf(g,"%d",k);
fcloseall();
return 0;
}