Line 3,583:
<syntaxhighlight lang="easylang">
proc permlist k . list[] .
if k = len list[]▼
print list[]▼
return
.▼
for i = k to len list[]
swap list[i] list[k]
permlist k + 1 list[]
swap list[k] list[i]
▲ .
▲ if k = len list[]
▲ print list[]
.
.
|
edits