Cod sursa(job #392119)

Utilizator meandyou01George Tudor meandyou01 Data 6 februarie 2010 19:39:00
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.32 kb
Raporteaza aceasta sursa 
#include<fstream.h>
ifstream fin("fractii.in");
ofstream fout("fractii.out");
long n,i,j,i1,j1,s,c;
int main()
{fin>>n;
 for(i=1;i<=n;i++)
  for(j=1;j<=n;j++)
  { i1=i;
    j1=j;
    while(j1)
    { c=i1%j1;
      i1=j1;
      j1=c;
    }
    if(i1==1)s++;
  }
 fout<<s;
fin.close();
fout.close();
return 0;
}