Rosetta Code

Sieve of Eratosthenes: Difference between revisions

← Older editNewer edit →
Content deleted Content added
Rahul (talk | contribs)
418 edits
Rahul (talk | contribs)
418 edits
Line 486:
 
=={{header|Icon}}==
 
[http://www.tools-of-computing.com/tc/CS/iconprog.pdf Icon HandBook]
procedure main()
sieve(100)
Line 496:
if p[i] == "1" then
every j:= i+i to n by i do p[j]:="0"
every i:=2 to n do if p[i]==write(find("1", then write(ip))
end
 
Retrieved from "https://rosettacode.org/wiki/Sieve_of_Eratosthenes"