Cod sursa(job #219284)

Utilizator ooctavTuchila Octavian ooctav Data 6 noiembrie 2008 12:01:12
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.5 kb
#include <stdio.h>
#include "stdafx.h"

int main()
{
	int n,i,j,r,d=0,dd=0,ddd=0,g,h;
	FILE *f1,*f2;
	f1=fopen("fractii.in","r");
	f2=fopen("fractii.out","w");
	fscanf(f1,"%d",&n);
	for(i=1;i<=n;++i)
	{
		for(j=1;j<=n;j++)
		{
			g=j;
			h=i;
			while(g!=0)
			{
				r=h%g;
				if(r==1)
				{
					d=d+1;
					break;
				}
				h=g;
				g=r;
			}
			dd=dd+d;
			d=0;
		}
		ddd=ddd+dd;
		dd=0;
	}
	ddd=ddd+n;
	fprintf(f2,"%d",ddd);
	fclose(f1);
	fclose(f2);

	return 0;
}