Cod sursa(job #1005633)

Utilizator EdyOnuEdy Onu EdyOnu Data 5 octombrie 2013 13:49:57
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.47 kb
#include <fstream>
using namespace std;
ifstream f("fractii.in");
ofstream g("fractii.out");
int n;
void citire(int&n)
{f>>n;}
int a,b;
int rest(int a,int b)
{int r,aux;
 if(a>b)
   {aux=a;
    a=b;
    b=aux;
   }
r=a%b;
while(r!=0)
  {a=b;
   b=r;
   r=a%b;
  }
 if(b==1)return 1;
 return 0;
}
void fractii(int n)
{int p=0,q,nr=0;
 for(p=1;p<=n;p++)
  for(q=1;q<=n;q++)if(rest(p,q))nr++;
g<<nr;
}
int main()
{citire(n);
 fractii(n);
    return 0;
}