Cod sursa(job #312748)

Utilizator meskalineMihalache Alexandru Calin meskaline Data 6 mai 2009 21:10:29
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.46 kb
#include <stdio.h>
#include <fstream.h>
#include <string.h>

long euclid(int a, int b)  
{ 
   int c;  
   while (b) 
   {  
       c = a % b;  
       a = b;  
       b = c;  
   }  
   return a;  
}

int main()
{
	FILE *fi,*fo;
	long i,j,c=0,n;
	fi=fopen("fractii.in", "r");
	fi=fopen("fractii.out", "w");
	fscanf(fi,"%ld", &n);
	for(i=1;i<=n;i++)
		for(j=1;j<=n;j++)
			if(euclid(i,j)==1)
				c++;
		
	fprintf(fo,"%d", c);
	return 0;
}