Cod sursa(job #1005644)

Utilizator EdyOnuEdy Onu EdyOnu Data 5 octombrie 2013 14:04:39
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.43 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;
void fractii(int n)
{int p=0,q,nr=0,aux,r;
 for(p=1;p<=n;p++)
  for(q=1;q<=n;q++)
  {a=p;b=q;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)nr++;
  }
g<<nr;
}
int main()
{citire(n);
 fractii(n);
    return 0;
}