Cod sursa(job #758171)

Utilizator issukDomnisoru Andreea Simona issuk Data 14 iunie 2012 18:52:51
Problema Fractii Scor 10
Compilator c Status done
Runda Arhiva de probleme Marime 0.5 kb
#include<stdio.h>
int euclid(int a, int b){
	int c;
	while (b!=0) {
		c = a % b;
		a = b;
		b = c;
	}
return a;
}

int main(){
	int N,max=0,i,j;
	FILE *in, *out;
	in=fopen ("fractii.in","r");
  	if (in==NULL) 
		perror ("Error opening file");
	else{
		fscanf(in,"%d",&N);
	}
	fclose(in);

	for(i=1;i<=N;i++)
		for(j=1;j<=N;j++)
			if(euclid(i,j)==1)
				max++;
	out=fopen ("fractii.out","w");
	if (out==NULL) perror ("Error opening file");
	else{
			fprintf(out,"%d",max);
	}
	fclose(out);
return 0;
}