Product of divisors: Difference between revisions

Content added Content deleted
m (→‎{{header|REXX}}: elided unneeded function, changed some comments.)
m (→‎{{header|REXX}}: changed a comment.)
Line 772: Line 772:
parse arg n cols . /*obtain optional argument from the CL.*/
parse arg n cols . /*obtain optional argument from the CL.*/
if n=='' | n=="," then n= 50 /*Not specified? Then use the default.*/
if n=='' | n=="," then n= 50 /*Not specified? Then use the default.*/
if cols=='' | cols=="," then cols= 5 /*Not specified? Then use the default.*/
if cols=='' | cols=="," then cols= 5 /* " " " " " " */
say ' index │'center("product of divisors", 102) /*display title for the column #s*/
say ' index │'center("product of divisors", 102) /*display title for the column #s*/
say '───────┼'center("" , 102,'─') /* " " separator (above)*/
say '───────┼'center("" , 102,'─') /* " " separator (above)*/