Cod sursa(job #155392)

Utilizator m3rikPaul Urziceanu m3rik Data 11 martie 2008 21:46:06
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.5 kb
#include<fstream.h>

long n,contor=0,stv[2];

ifstream fin("fractii.in");
ofstream fout("fractii.out");

int cmmdc(int a,int b)
{
	int tmp;
	while(b!=0)
	{
		tmp=a%b;
		a=b;
		b=tmp;

	}
	return a;
}

void back(int k)
{
	int i,cont;
	if(k==2) contor++;
	else
	{
		for(i=1;i<=n;i++)
		{
			stv[k]=i;
			cont=1;
			if(k==1&&stv[0]!=1&&stv[1]!=1&&cmmdc(stv[0],stv[1])!=1) cont=0;
			if(cont)back(k+1);
		}
	}
}



int main()
{
	fin>>n;
	back(0);
	fout<<contor;
	return 0;
}