Permutations: Difference between revisions
Content added Content deleted
m (→numbers: added whitespace. -- ~~~~) |
m (→numbers: corrected a permutation. -- ~~~~) |
||
Line 2,226: | Line 2,226: | ||
<lang rexx>/*REXX program shows permutations of '''N''' number of objects (1,2,3, ...).*/ |
<lang rexx>/*REXX program shows permutations of '''N''' number of objects (1,2,3, ...).*/ |
||
parse arg n .; if n=='' then n=3 /*Not specified? Assume default*/ |
parse arg n .; if n=='' then n=3 /*Not specified? Assume default*/ |
||
/*populate the first |
/*populate the first permutation.*/ |
||
do pop=1 for n; @.pop=pop ; end; call tell n |
do pop=1 for n; @.pop=pop ; end; call tell n |
||