Cod sursa(job #16962)

Utilizator HolyBladeOld Radu HolyBlade Data 14 februarie 2007 16:31:39
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.35 kb
Raporteaza aceasta sursa 
#include<iostream.h>
#include<fstream.h>
unsigned N,k=1,i,j,a,b;
int main()
{ifstream f("fractii.in");
 f>>N;
 for(i=1;i<=N;i++)
	 for(j=1;j<=N;j++)
		 {a=i;b=j;
			if(a!=b)
			 {while(a!=b)
				if(a>b)
				 a=a-b;
				else
				 b=b-a;
			if(a==1)
			 k++;
			 }
			}
 ofstream g("fractii.out");
 g<<k;
 f.close();g.close();
 return 0;
}