Combinations with repetitions: Difference between revisions
m
no edit summary
mNo edit summary |
|||
Line 815:
<pre>[["iced", "iced"], ["iced", "jam"], ["iced", "plain"], ["jam", "jam"], ["jam", "plain"], ["plain", "plain"]]
220</pre>
=={{header|Easyprog.online}}==
<lang>items$[] = [ "iced" "jam" "plain" ]
n = len items$[]
k = 2
len result[] k
n_results = 0
#
func output . .
n_results += 1
if len items$[] > 0
s$ = ""
for i range k
s$ &= items$[result[i]] & " "
.
print s$
.
.
func combine pos val . .
if pos = k
call output
else
for i = val to n - 1
result[pos] = i
call combine pos + 1 i
.
.
.
call combine 0 0
#
n_results = 0
n = 10
k = 3
len result[] k
items$[] = [ ]
call combine 0 0
print ""
print n_results & " results with 10 donuts"<lang>
<pre>
iced iced
iced jam
iced plain
jam jam
jam plain
plain plain
220 results with 10 donuts
</pre>
=={{header|EchoLisp}}==
| |||