Tema: Re: matrix
Autorius: Laimis
Data: 2011-02-18 12:26:47
CurrentUser rašė:
> 1. Man nereikia rasti deriniu SKAICIAUS, - reikia sugeneruoti imanomus
> variantus.

Tai ir generuoji. Turi dvimatį map (skaičiai <-> raidės) 
žodynėlį/masyvą, imi skaičių ir nuosekliai nagrinėji po skaitmenį, 
ciklais formuodamas visus įmanomus derinius:

map[1] = [A, Ą, J, S, Š]
map[2] = [B, K, T]
map[3] = [C, Č, L, U, Ų, Ū]
map[4] = [D, M, V]
map[5] = [E, Ę, Ė, N, W]
map[6] = [F, 0, X]
map[7] = [G, P, Y]
map[8] = [H, Q, Z, Ž]
map[9] = [I, Į, R]

Pvz.: 123793


FOR i in map[1]
     s = i
     FOR j in map[2]
	s = s & j
	FOR k in map[3]
             s = s & k
	    FOR l in map[7]
                 s = s & l
	        FOR m in map[9]
		    s = s & m 	
                     FOR n in map[3]
		        s = s & n
			PRINT s	 	
                     NEXT
		NEXT
	    NEXT
	NEXT
     NEXT
NEXT