OpenEuphoria

isn't this a common compsci hw problem?

• Posted by jimcbrown (admin) Jul 02, 2010
• 1094 views

for a = 1 to length(sMySeq[1]) do 
    for b = 1 to length(sMySeq[2]) do 
        for c = 1 to length(sMySeq[3]) do 
        .... 

sMySeq = {{a1,a2},{b1,b2},{c1,c2},{d1,d2,d3}} 

Hmm, I assumed you could just iterate it through with two for loops, but now I realize it's a bit more complicated than that. You'd need something like this:

sequence sCombo, sCombo_old 
sCombo = {} 
sCombo_old = sMySeq[1] 
for i = 2 to length(sMySeq) do 
	for k = 1 to length(sCombo_old) do 
		for j = 1 to length(sMySeq[i]) do 
			sCombo = append(sCombo, sCombo_old[k] & sMySeq[i][j]) 
		end for 
	end for 
	sCombo_old = sCombo 
	sCombo = {} 
end for 

Which does strongly suggest that this problem is naturally suited to be solved using a recursive function, for obvious reasons.