Cod sursa(job #174726)

Utilizator thepetAndrei Sebastian Petrescu thepet Data 9 aprilie 2008 10:41:51
Problema Fractii Scor 10
Compilator cpp Status done
Runda Arhiva de probleme Marime 0.66 kb
#include <stdio.h>
FILE *f=fopen("fractii.in","r");
FILE *g=fopen("fractii.out","w");
unsigned long n, a[2][1000000],i ,j;

int prim (unsigned long a, unsigned long b)
{if (a==1||b==1)
	return 1;
 else
	if (a==b)
		return 0;
	else
		{unsigned long r=a%b;
 		 while (r!=0)
			{a=b;
			 b=r;
			 r=a%b;
			}
		 if (b==1)
			return 1;	 
		}
 return 0;
}

int main()
{fscanf(f,"%d",&n);
 for (i=1; i<=n; i++)
	{for (j=1; j<=n; j++)
		if (prim(i,j))
			{a[1][j]=a[1][j-1]+1;
			 a[1][j-1]=0;}
		else
			{a[1][j]=a[1][j-1];
 			 a[1][j-1]=0;}
	 a[0][n]=a[0][n]+a[1][n];
	 a[1][n]=0;
	}
 fprintf(g,"%d\n",a[0][n]);
 fcloseall();	
 return 0;
}