Cod sursa(job #382570)

Utilizator AdrianMarMarinica Adrian-Petre AdrianMar Data 13 ianuarie 2010 22:13:05
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.5 kb
#include<iostream.h>
#include<fstream.h>
#include<math.h>
long min(long i, long j)
{if(i<j)
	return i;
else return j;}

int main ()
{ long i, j, n; int k, gg, suma, a;
fstream f ("fractii.in", ios::in);
f>>n; f.close();

suma=2*n-1;
	
for(i=2; i<=n; i++)
	for(j=2; j<=n; j++)
	{a=min(i,j);k=2, gg=0;
		if(i!=j){while((k<=a)&&(gg==0))
			{if ((i%k==0)&&(j%k==0))
				gg=1;
			k++;}
			if (gg==0)
				suma++;}}
	
fstream g("fractii.out", ios::out);
g<<suma; g.close();
return 0;
}