Truncatable primes: Difference between revisions
Content deleted Content added
m →{{header|REXX}}: un-dented a DO loop. -- ~~~~ |
m →{{header|REXX}}: combined two statements into one line. -- ~~~~ |
||
Line 1,405:
lp=0; rp=0
do j=n by -1 until lp\==0 & rp\==0; if pos(0,p.j)\==0 then iterate
do L=1 for 1 while lp==0
do k=1 for length(p.j)-1; _=right(p.j,k) /*truncate a #.*/
|