Cod sursa(job #21097)

Utilizator swift90Ionut Bogdanescu swift90 Data 22 februarie 2007 21:41:57
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.74 kb
#include<stdio.h>
int main(){
	FILE*in=fopen("fractii.in","r");
	FILE*out=fopen("fractii.out","w");
	int p,q,p1,q1,nr=0,n;
	fscanf(in,"%d",&n);
	fclose(in);
	nr=n;
	for(p=2;p<=n;p++){
		if(p%2==0){
			for(q=1;q<=n;q=q+2){
				if(q==1)
					nr++;
				if(q!=1){
					p1=p;
					q1=q;
					while(q1!=p1){
						if(q1>p1)
							q1=q1-p1;
						if(p1>q1)
							p1=p1-q1;
					}
					if(p1==1)
						nr++;
				}
			}
		}
		if(p%2==1){
			for(q=1;q<=n;q++){
				if(q==1)
					nr++;
				if(q!=1){
					p1=p;
					q1=q;
					while(q1!=p1){
						if(q1>p1)
							q1=q1-p1;
						if(p1>q1)
							p1=p1-q1;
					}
					if(p1==1)
						nr++;
				}
			}
		}
	}
	fprintf(out,"%d\n",nr);
	fclose(out);
	return 0;
}