Truncatable primes: Difference between revisions
Content added Content deleted
| Line 996: | Line 996: | ||
declare (i, j) fixed binary (31); |
declare (i, j) fixed binary (31); |
||
primes = '1'b; |
primes = '1'b; primes(1) = '0'b; |
||
do i = 2 to sqrt(max_primes); |
do i = 2 to sqrt(max_primes); |
||
| Line 1,008: | Line 1,008: | ||
</lang> |
</lang> |
||
<pre> |
<pre> |
||
739399 is right-truncatable |
739399 is right-truncatable |
||
998443 is left-truncatable |
|||
</pre> |
|||
=={{header|PowerShell}}== |
=={{header|PowerShell}}== |
||