Cod sursa(job #137089)

Utilizator busuAndrei Busuioc busu Data 16 februarie 2008 21:30:34
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.36 kb
#include<fstream.h>
#include<iostream.h>
int cmmdc(int i,int j)
{
	while(i!=j)
	if(i>j)
	i=i-j;
	else
	j=j-i;
	return i;
}
int main()
{
	int i,j,n,rez=1;
	fstream f("fractii.in",ios::in);
	f>>n;
	for(i=1;i<=n;i++)
	for(j=1;j<=n;j++)
	if((i!=j)&&(cmmdc(i,j)==1))
	rez++;
	f.close();
	fstream g("fractii.out",ios::out);
	g<<rez;
	g.close();
}