Cod sursa(job #921703)

Utilizator tamo1944Kovacs Tamas tamo1944 Data 21 martie 2013 11:09:55
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.43 kb
#include<stdio.h>

long N;

int lnko(long a,long b)
{
	long s;
	while ( a != 0 ) 
	{
		s = a;
		a = b%a;
		b = s;
    }
    
	return b;
}


int main()
{
	int sz;
	
	FILE*f=fopen("fractii.in","rt");
	fscanf(f,"%ld",&N);
	
	for(long i=1;i<=N;i++)
	{
		for(long j=1;j<=N;j++)
		{
			if(lnko(i,j)==1 && i>=1)
				sz++;
			
		}
	}
	
	FILE*g=fopen("fractii.out","wt");
	fprintf(g,"%ld",sz);
	
	return 0;
}