Cod sursa(job #89007)

Utilizator cristian_alex_81cristian alexandru cristian_alex_81 Data 5 octombrie 2007 11:39:28
Problema Fractii Scor 0
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.67 kb
#include <stdio.h>
#include <math.h>

//--------------------

FILE * f=fopen ("fractii.in","r");
FILE * g=fopen ("fractii.out","w");

long int n,total,nr,multiplu,ct;
//--------------------
void cit()
{
fscanf (f,"%ld",&n);
}
//--------------------
void tip()
{
fprintf (g,"%ld",total);
}
//--------------------
void calc()
{       total=n;
	for (nr=2;nr<=n;nr++)
	{
		multiplu=2;
		ct=0;
		while (multiplu<=n)
		{
			if ((nr%multiplu==0)||(multiplu%nr==0))
			{
			ct++;
			}
			multiplu++;
		}
		total=total+n-ct;
	}
}
//--------------------
int main()
{
cit();
calc();
tip();
fclose(f);
fclose(g);
return 0;
}
//--------------------