Cod sursa(job #143517)

Utilizator uta_cristianUta Cristian uta_cristian Data 26 februarie 2008 17:07:17
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.42 kb
#include<fstream>
using namespace std;
ifstream f("fractii.in");
ofstream g("fractii.out");
int cmmdc(int a,int b)
 {int c;
   while (b)
    {c=a%b;
     a=b;
     b=c;
    }
  return a;
 }
unsigned long fractii(long n)
 {long i,j;
  unsigned long nr=0;
   for (i=1;i<=n;i++)
    for (j=1;j<=n;j++)
     if (cmmdc(i,j)==1) nr++;
  return nr;
 }
int main()
{
int n;
f>>n;
g<<fractii(n);
return 0;
}