Algoritmi - Algoritmo numeri primi

Salve a tutti con l'aiuto di un mio professore ho trovato l'algoritmo per calcolare i numeri primi. Ho fatto una scoperta eccezionale o no?

E' una scoperta eccezionale che fanno tutti quelli che programmano da 3 mesi

eh ma che ne so io. tutti dicono che è un enigma per i matematici.

I numeri primi non hanno una simmetria spaziale

Ci sono molte ricerche riguardo alcune delle proprietà dei numeri primi (o di sottoinsiemi speciali dei numeri primi, come i primi di Mersenne, i primi gemelli, ecc...) e tutt'ora si tratta di un campo di ricerca aperto.

Tuttavia, calcolare se un numero è primo oppure no è un compito che è stato risolto da molti secoli, niente di eclatante insomma

EDIT: it.wikipedia.org/wiki/…
Eratostene, ad esempio, ci era riuscito 2200 anni fa ;-)

No, pero' complimenti! E' sempre una bella soddisfazione personale.

NO, io ho fatto un programma che calcola quali sono i numeri primi da 2 a n e non un programma che verifica se lo sono.

program numeriprimi;
uses crt;
var j, i:integer;
var primo:boolean;
begin
writeln('Scrivi il numero massimo');
readln(num);
writeln(2);
for j := 3 to num do
begin
primo := true;
for i := 2 to (j - 1) do
begin
if (j mod i = 0) then
begin
primo := false;
end;
end;
if primo = true then
writeln(j);
end;
end;
end.

Questa parte del tuo algoritmo calcola se "j" è un primo

for i := 2 to (j - 1) do
begin
if (j mod i = 0) then
begin
primo := false;
end;

E riutilizzi questo algoritmo "num" volte, per tirare fuori la lista dei primi da 0 fino a "num".

Ora leggiti l'algoritmo di Eratostene che ho linkato qualche post più su, così puoi studiare un metodo più raffinato che fa la stessa cosa con un numero inferiore di passaggi