Anonymous user
Permutations: Difference between revisions
→{{header|Run BASIC}}
Line 2,319:
perm$ = perm$ + theList$(k)
next k
if instr(perms$,perm$+",") = 0 then print perm$ ' only list 1 time
perms$ = perms$ + perm$ + ","
h$ = theList$(j)
|