Cod sursa(job #258727)

Utilizator MathPlayerPopescu Bogdan Constantin MathPlayer Data 15 februarie 2009 10:57:19
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.34 kb
Raporteaza aceasta sursa 
#include<fstream.h>
int divizor(int x,int y)
{while(x!=y)
	{if(x>y)x=x-y;
   else y=y-x;}
return x;
}

int main()
{ifstream f("fractii.in");
ofstream g("fractii.out");
int nr=0,n,i,j;
f>>n;
for(i=1;i<=n;i++)
	for(j=1;j<=n;j++)
		if(i-j==1||i-j==-1)nr++;
      else if(divizor(i,j)==1)nr++;
g<<nr;
f.close();
g.close();
return 0;
}