Cod sursa(job #113251)
Utilizator | Derevenschi Adrian J4cK | Data | 9 decembrie 2007 13:08:24 |
---|---|---|---|
Problema | Fractii | Scor | 10 |
Compilator | cpp | Status | done |
Runda | Arhiva de probleme | Marime | 0.33 kb |
#include <fstream.h>
int main()
{
long p,n,s=0,q,c,cp,cq;
ifstream fin("fractii.in");
ofstream fout("fractii.out");
fin>>n;
for (p=1; p<=n; p++)
{
for (q=1; q<=n; q++)
{
cp=p;
cq=q;
while (cq)
{
c=cp%cq;
cp=cq;
cq=c;
}
if (cp==1)
s=s+1;
}
}
fout<<s;
return 0;
}