Cod sursa(job #5805)
Utilizator | Data | 15 ianuarie 2007 09:30:06 | |
---|---|---|---|
Problema | Fractii | Scor | 10 |
Compilator | cpp | Status | done |
Runda | Arhiva de probleme | Marime | 0.3 kb |
#include <fstream.h>
long int cmmdc(long int a,long int b)
{
long int r;
while(b){r=a%b;a=b;b=r;}
return a;
}
int main()
{
ifstream fin("fractii.in");
ofstream fout("fractii.out");
long n,s=0,i,j;
fin>>n;
for(i=1;i<=n;i++)
for(j=1;j<=n;j++)
if(cmmdc(i,j)==1) s++;
fout<<s;
return 0;
}