„Eratoszthenész szitája” változatai közötti eltérés
[nem ellenőrzött változat] | [nem ellenőrzött változat] |
Tartalom törölve Tartalom hozzáadva
Nincs szerkesztési összefoglaló |
|||
124. sor:
a:array[1..2000000] of boolean; //logikai tömböt hozunk létre
Begin
n:=2000000; //az n lehet bármilyem érték ami belefér longint-ba
a[1]:=false; //az a[1] 0-t vesz fel mivel az 1 nem primszám
for i:=2 to n do a[i]:=true; //feltöltjuk a tömbök 1-esekkel
|