Seek prime number by screening

Seek all prime numbers not greater than 1000000

Solution:

A B C D
1 1000000    
2 =to(A1)    
3 =int(sqrt(A1)) >A2(1)=0  
4 for A3 if A2(A4)>0 =A1.step(A4).to(2,)
5     >A2(C4)=0
6 =A2.select(~>0)    

The computation in A6 is shown below: