"CurrentUser" <ne_toks@yahoo.com> wrote in message news:ijdubf$nvp$1@trimpas.omnitel.net... > Sveiki, > Jauciu, yra kazkokie jau standartiniai sprendimai iš tokios matricos > istraukti visus imanomus nepasikartojancius variantus, kaip antai a1 & a2 & > a3. > Aplinka geriau butu kas nors "po prošče", koks VBA. Gal KAS PAMAČYTŲ. ačiū Nesenai loteriju analize dariau :) tai ten buvo irgi suskaiciuot kiek kartu kokios sekos kartojasi... Kitas dalykas darydamas kuo paprasciau tai yra su VBA - sau is karto paty sudetingiausia kelia pasirenki nes jei gerai pamenu VBA ir VB nepalaiko didesniu nei 1maciai masyvai, ten galesi tik: Dim bla as string() padaryt Jami bet kokia .net kalba ar kokia java ar kiek matau ir pythom palaiko: http://docs.python.org/library/array.html ir su ja darai sakyciau, kad ir VB.NET jei VB artimiausias, arba kitaip 3.14stis teks galvojant kaip padaryti matrica ant VBA, o toliau nieko sunkaus labai ir nerda. .NET as tai sprendziau paprastai, elementariai registruoji kiekviena kombinacija kazkur ir viskas, pvz. (rasau is galvos) : // visas skaiciuotuvas su generic types public class Stats<T> where T : IComparable<T> // tai leis implementuoti savo sulyginimo mechanizma { Dictionary<T,int> _StatsCount = new Dictionary<T,int>(); public void NewStat (T o){ if ( _StatsCount.ContainsKey(o)){ _StatsCount[0]++; } else { _StatsCount.Add(o); } } } public class SkaiciuojamasObjektas : IComparable { int Value = Rand.(...) public SkaiciuojamasObjektas(){ } public int CompareTo (object obj) { } }