Cod sursa(job #2545099)

Utilizator LianiuIulian Panaitescu Lianiu Data 12 februarie 2020 20:27:55
Problema Fractii Scor 10
Compilator c-64 Status done
Runda Arhiva de probleme Marime 0.54 kb
#include <stdio.h>
#include <stdlib.h>

int cmmdc(int a, int b){
	
	if(a==0)
		return b;
	if(b==0)
		return a;

	if(a==b)
		return a;

	if(a>b)
		return cmmdc(a-b,b);
	return cmmdc(a,b-a);
}

int main(){

	FILE *input=fopen("fractii.in","rt");
	if(!input)
		return 0;

	int N;

	fscanf(input,"%i",&N);

	fclose(input);

	int P,Q,count=0;

	for(P=1;P<=N;P++){
		for(Q=1;Q<=N;Q++){
			if(cmmdc(P,Q)==1){
				count++;
			}
		}
	}

	FILE *output=fopen("fractii.out","wt");
	if(!output)
		return 0;

	fprintf(output,"%i\n",count);

	fclose(output);

	return 0;
}