Anonymous user
Truncatable primes: Difference between revisions
m
→{{header|REXX}}: combined two statements into one line. -- ~~~~
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 #.*/
| |||