Piprimes: Difference between revisions
Added Quackery.
(Piprimes en BASIC256 y Yabasic) |
(Added Quackery.) |
||
Line 618:
20 20 21 21 21 21 21 21
</pre>
=={{header|Quackery}}==
<code>isprime</code> is defined at [[Primality by trial division#Quackery]].
<lang Quackery> [ 0 swap
1 - times
[ i 1+ isprime + ] ] is pi ( n --> n )
2 [ dup pi dup 22 < while
echo sp 1+ again ]
2drop</lang>
{{out}}
<pre>0 1 2 2 3 3 4 4 4 4 5 5 6 6 6 6 7 7 8 8 8 8 9 9 9 9 9 9 10 10 11 11 11 11 11 11 12 12 12 12 13 13 14 14 14 14 15 15 15 15 15 15 16 16 16 16 16 16 17 17 18 18 18 18 18 18 19 19 19 19 20 20 21 21 21 21 21 21</pre>
=={{header|Raku}}==
| |||