nesco писал(а):
Вот так для строк неплохо работаету меня берется первая карта и любая карта из колоды и меняются местами, потом вторая итд
у тебя любая карта в любое место колоды.
т.е все таки перетасовка у меня, а перемешивание у тебя.
Вопрос. Что лучше. ?
Наверно сдвиг колоды + перетасовка + перемешивание
------------ Дoбавленo в 19.12:
а это прямой перебор
т.е берется первая карта и вставляется в любое место колоды, потом опять первая карта в колоде вставляется в любое место.
------------ Дoбавленo в 19.12:
Add(MainForm,11182862,161,49)
{
Left=20
Top=105
Width=154
Height=251
Caption="Пример использования Random"
}
Add(Random,5447273,161,140)
{
Max=9
Point(doRandomWithoutRepeats)
link(onRandom,879654:doEvent1,[])
}
Add(StrList,14407297,322,98)
{
Strings=#5:card0|5:card1|5:card2|5:card3|5:card4|5:card5|5:card6|5:card7|5:card8|5:card9|
Point(doSwap)
Point(Idx1)
Point(Idx2)
Point(doInsert)
Point(onGetString)
Point(doGetString)
link(Str,9732334:Value,[])
link(onGetString,9732334:doValue,[(377,111)(377,29)(310,29)(310,55)])
}
Add(Button,12351317,91,154)
{
Left=10
Top=10
link(onClick,5447273:doRandomWithoutRepeats,[])
}
Add(Memo,5323340,392,189)
{
Left=10
Top=40
Width=110
Height=160
}
Add(DoData,15419462,322,189)
{
link(onEventData,5323340:doAdd,[])
link(Data,14407297:Text,[])
}
Add(Counter,10192878,238,105)
{
Default=-1
link(onNext,4286880:doEvent1,[])
}
Add(Hub,879654,203,140)
{
OutCount=3
link(onEvent1,10192878:doNext,[(227,146)(227,111)])
link(onEvent2,14407297:doInsert,[])
link(onEvent3,15419462:doData,[(269,160)(269,195)])
}
Add(Memory,9732334,322,49)
{
Point(Data)
}
Add(Hub,4286880,287,105)
{
link(onEvent1,14407297:doGetString,[(311,111)(311,160)])
link(onEvent2,14407297:doDelete,[])
}
Поиск
Друзья
Администрация