Cod sursa(job #142452)

Utilizator andreirRoti Andrei andreir Data 24 februarie 2008 17:26:13
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.38 kb
#include<fstream.h>
int main()
{
	long int n;
	int i,j,c,k,ok;
	ifstream fin("fractii.in");
	ofstream fout("fractii.out");
	fin>>n;
	c=0;
	for(i=1;i<=n;i++)
		for(j=1;j<=n;j++)
		{
				if(i>j)
				{
					i=i-j;
					j=i+j;
					i=j-i;
				}
				ok=0;
				for(k=i;k>1;k--)
					if(i%k==0 && j%k==0)
						ok=1;
				if(ok=0)
					c++;
		}
	fout<<c;
	return 0;
}