Anonymous user
Cyclops numbers: Difference between revisions
m
→{{header|REXX}}: changed a comment.
m (→{{header|REXX}}: optimized the GENP subroutine.) |
m (→{{header|REXX}}: changed a comment.) |
||
Line 2,024:
0: parse arg title; idx= 1 /*get the title of this output section.*/
say ' index │'center(title, 1 + cols*(w+1) ) /*display the output title. */
say '───────┼'center("" , 1 + cols*(w+1), '─') /* "
finds= 0; $= /*the number of finds (so far); $ list.*/
do j=0 until finds== n; L= length(j) /*find N cyclops numbers, start at 101.*/
| |||