|
Il '''crivello di Eratostene''' è un antico procedimento per il calcolo delle tabelle di numeri primi fino ad un certo numero n prefissato. Deve il nome al matematico Eratostene di Cirene, che ne fu l'ideatore. È a tutt'oggi utilizzato come algoritmo di calcolo dei numeri primi da molti programmi per computer; pur non essendo un algoritmo straordinariamente efficiente, infatti, è in compenso piuttosto semplice da tradurre in un qualsiasi linguaggio di programmazione.
===Implementazione in [[C]]===
<source lang="c">
#include <stdio.h>
#include <stdlib.h>
#ifdef INT128BIT
//Con questa definizione l'algoritmo dovrebbe supportare interi a 128bit.
//Richiede la compilazione con GCC e processore a 64bit per SO UNIX. Purtroppo
//non è stato testato e non può essere considerato funzionante.
#include <stdint.h>
typedef uint64_t __int_t;
//Definizione del numero massimo del setaccio.
//Ricordate che se dichiarate n, il valore massimo controllato sarà n-1!
//il valore definito è il massimo possibile per questo tipo
#define UPPER_LIMIT UINT64_MAX
#endif
#ifndef INT128BIT
typedef unsigned long int __int_t;
//Definizione del numero massimo del setaccio.
//Ricordate che se dichiarate n, il valore massimo controllato sarà n-1!
//il valore definito è il massimo possibile per questo tipo.
#define UPPER_LIMIT 65534
#endif
#define MAXNUM 5000
int main()
{
//Definizione variabili
__int_t* num_matrix;
__int_t i=0, t=0, k=2;
int a=0; //(solo per la stampa dei risultati)
if ( MAXNUM >= UPPER_LIMIT )
return 1;
//Inizializza il vettore del setaccio.
num_matrix=(__int_t*)malloc(MAXNUM*sizeof(__int_t));
for (i=0; i < MAXNUM; i++)
num_matrix[i]=i;
//Eliminazione dal crivello di 1
num_matrix[1]=0;
//Crivello di Eratostene.
//Si consideri che l'algoritmo è semplificato e potrebbe essere
//enormemente migliorato, evitando ad esempio cicli inutili.
//Pseudocodice:
//per i da 0 al valore massimo
// per il multiplo k di i
// per t da 0 al valore massimo
// se il numero t del vettore non è già stato eliminato
// se il resto della divisione intera tra il numero t \
// e il multiplo k di i è uguale da zero
// escludi il numero t dal vettore (=0)
for (i = 0; i < MAXNUM; i++)
{
if ( num_matrix[i] != 0 )
{
for (k = 2; k < MAXNUM; k++)
{
for (t = 0; t < MAXNUM; t++)
{
if ( num_matrix[t] != 0 )
{
if ( (num_matrix[t]%(k*i)) == 0 )
num_matrix[t]=0;
};
};
};
};
};
//Fine algoritmo
//Stampa risultati (10 per riga)
i=0; a=0;
for (i=i; i < MAXNUM; i++)
{
if ( num_matrix[i] != 0 )
{
fprintf(stdout, "%ld\t", num_matrix[i]);
a++;
if ( a == 9 )
{
fprintf(stdout, "\n");
a=0;
};
};
};
free(num_matrix);
system("pause");
}
</source>
===Implementazione in [[PHP]]===
| 