Cod sursa(job #133776)
| Utilizator | Data | 9 februarie 2008 18:26:10 | |
|---|---|---|---|
| Problema | Fractii | Scor | 10 |
| Compilator | cpp | Status | done |
| Runda | Arhiva de probleme | Marime | 0.45 kb |
#include <stdio.h>
FILE* f;
long int n;
long int p,q;
long int cat;
long int i,min,bec;
main()
{
f=fopen ("fractii.in","r");
fscanf (f,"%ld",&n);
fclose (f);
for (p=1;p<=n;p++)
for (q=1;q<=n;q++)
{
min=(p>q?q:p);
bec=1;
for (i=2;i<=min;i++)
if (q%i==0&&p%i==0)
{
bec=0;
break;
}
if (bec==1)
cat++;
}
f=fopen ("fractii.out","w");
fprintf (f,"%ld",cat);
fclose (f);
}
