Cod sursa(job #183323)
Utilizator | Data | 21 aprilie 2008 22:32:44 | |
---|---|---|---|
Problema | Fractii | Scor | 0 |
Compilator | cpp | Status | done |
Runda | Arhiva de probleme | Marime | 0.33 kb |
#include<fstream.h>
#include<math.h>
int N,a,b,ca,cb,s,r;
int main()
{
ifstream input("fracti.in");
ofstream output("fracti.out");
input>>N;
for(a=1;a<=N;a++)
for(b=1;b<=N;b++);
{
ca=a;
cb=b;
do
{
r=ca%cb;
ca=cb;
cb=r;
}
while(r);
if(ca==1)
s++;
}
output<<s;
return 0;
}