Palindromic primes: Difference between revisions
Content added Content deleted
m (→{{header|REXX}}: changed how to find the maximum palindromic prime.) |
m (→{{header|REXX}}: changed a comment.) |
||
| Line 452: | Line 452: | ||
$= /*a list of palindromic primes (so far)*/ |
$= /*a list of palindromic primes (so far)*/ |
||
do j=1 for hi /*search for palindromic primes. */ |
do j=1 for hi /*search for palindromic primes. */ |
||
if \!.j then iterate /*Is this number |
if \!.j then iterate /*Is this number not prime? Then skip.*/ |
||
if j\==reverse(j) then iterate /*Not a palindromic prime? " " |
if j\==reverse(j) then iterate /*Not a palindromic prime? " " */ |
||
finds= finds + 1 /*bump the number of palindromic primes*/ |
finds= finds + 1 /*bump the number of palindromic primes*/ |
||
if cols<0 then iterate /*Build the list (to be shown later)? */ |
if cols<0 then iterate /*Build the list (to be shown later)? */ |
||