10001th prime: Difference between revisions
Added 11l
Alextretyak (talk | contribs) (Added 11l) |
|||
Line 4:
<br>Find and show on this page the 10001st prime number.
<br><br>
=={{header|11l}}==
<syntaxhighlight lang="11l">V k = 10001
V n = k * 17
V primes = [1B] * n
primes[0] = primes[1] = 0B
L(i) 2 .. Int(sqrt(n))
I !primes[i]
L.continue
L(j) (i * i .< n).step(i)
primes[j] = 0B
L(i) 0 .< n
I primes[i]
I k == 1
print(i)
L.break
k--</syntaxhighlight>
{{out}}
<pre>
104743
</pre>
=={{header|ALGOL 68}}==
| |||