Cod sursa(job #194351)

Utilizator cristideluClaudiu Antonovici cristidelu Data 9 iunie 2008 22:52:54
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.46 kb
#include <iostream.h>
#include <fstream.h>
ifstream f;
ofstream g;
long int n;
int i,j;

int verif (int a,int b)
{if (a==b)
return a;
else
while (a!=b)
if (a>b)
a-=b;
else
if (b>a)
b-=a;
return a;}

int u(int x,int a)
{int i,n=0;
for (i=2;i<=a;i++)
if(verif(x,i)!=1)
n++;
return n; }

int main()
{int nr=0;
f.open("fractii.in");
g.open("fractii.out");
f>>n;
for (i=2;i<=n;i++)
nr+=u(i,n);
g<<n*n-nr;
f.close();
g.close();
return 0;}