Cod sursa(job #102696)
Utilizator | Data | 14 noiembrie 2007 17:28:27 | |
---|---|---|---|
Problema | Fractii | Scor | 10 |
Compilator | cpp | Status | done |
Runda | Arhiva de probleme | Marime | 0.39 kb |
#include <fstream.h>
int cmmdc(long a, long b)
{ long r;
while(b)
{ r=a%b;
a=b;
b=r;
}
return a;
}
int main()
{ long n, p=1, q=1;
unsigned int nr_fractii=0;
ifstream f("fractii.in");
ofstream f2("fractii.out");
f>>n;
for(q=1;q<=n;q++)
for(p=1;p<=n; p++)
if(cmmdc(p,q)==1)
nr_fractii++;
f2<<nr_fractii;
return 0;
}