Cod sursa(job #171217)

Utilizator ghiutaalexGhiuta Alex ghiutaalex Data 3 aprilie 2008 21:05:53
Problema Ciurul lui Eratosthenes Scor 10
Compilator cpp Status done
Runda Arhiva educationala Marime 0.28 kb
Raporteaza aceasta sursa 
#include<stdio.h>
#define M 15
long n,c[M],r;
FILE*f=fopen("ciur.in","r");
FILE*g=fopen("ciur.out","w");
int main()
{long i,j;
 fscanf(f,"%ld",&n);
 for(i=2;i<=n;i++)
	{if(!c[i]) {r++;
		    for(j=i;j<=n;j+=i)
			c[j]=1;}}
 fprintf(g,"%ld",r);
 fcloseall();
 return 0;
}