Cod sursa(job #5806)
Utilizator | Data | 15 ianuarie 2007 09:32:36 | |
---|---|---|---|
Problema | Fractii | Scor | 0 |
Compilator | cpp | Status | done |
Runda | Arhiva de probleme | Marime | 0.33 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(i==1&&j!=1)
if(j==1&&i!=1)
if(cmmdc(i,j)==1) s++;
fout<<s;
return 0;
}