OpenEuphoria

Re: [rant][benchmark] Sieve of Eratosthenes

• Posted by ChrisB (moderator) Jan 08, 2019
• 1166 views

Hi

So you can tell I'm not a professional programmer.

How on earth does this calculate primes?

-- Euphoria Code  
  
integer n = 20000  
  
sequence b_lst = repeat( 1, n )  
sequence prime_lst = {}  
  
for prime = 2 to n do  
	if b_lst[prime] then  
		prime_lst = append(prime_lst, prime )  
		for i = prime * 2  to n by prime do  
			b_lst[i] = 0  
		end for  
	end if  
end for  
  
? prime_lst[$-9..$]  

Chris