Новые сообщения [новые:0]
Дайджест
Горячие темы
Избранное [новые:0]
Форумы
Пользователи
Статистика
Статистика нагрузки
Мод. лог
Поиск
|
|
25.02.2012, 00:38
|
|||
|---|---|---|---|
Перемешать массив из строк в случайном порядке |
|||
|
#18+
плиз киньте кодик дял перемешивания строкового массива в случайном порядке... буду рад ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
25.02.2012, 21:07
|
|||
|---|---|---|---|
Перемешать массив из строк в случайном порядке |
|||
|
#18+
surbanec, как вариант, можешь побаловаться с командой Rnd (n) - создание случайного числа от 0 до 1 я использовал её при перетасовке колоды в виртуальной карточной игре. присваиваешь каждой строке массива порядковый номер, после некоторых манипуляций с Rnd всё должно получиться. мб, предложат что-то потолковей. если нет, выложу код с моей проги, можно подправить под твои нужды ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
25.02.2012, 21:09
|
|||
|---|---|---|---|
Перемешать массив из строк в случайном порядке |
|||
|
#18+
бери 2-3 случайных числа и меняй по кругу в цикле Randomize For i = 1 To 1000 j = Int(UBound(m) * Rnd(k)) k = Int(UBound(m) * Rnd(j)) T = m(j): m(j) = m(k): m(k) = T Next i ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
25.02.2012, 23:28
|
|||
|---|---|---|---|
Перемешать массив из строк в случайном порядке |
|||
|
#18+
Код: vbnet 1. 2. 3. где swap - процедура обмена значений двух элементов массива, rand(from, to) - функция, возвращающая равномерно распределеённое случайное целое в заданном диапазоне. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
|
|
|
start [/forum/topic.php?fid=60&mobile=1&tid=2158044]: |
0ms |
get settings: |
11ms |
get forum list: |
16ms |
check forum access: |
4ms |
check topic access: |
4ms |
track hit: |
50ms |
get topic data: |
11ms |
get forum data: |
2ms |
get page messages: |
43ms |
get tp. blocked users: |
2ms |
| others: | 351ms |
| total: | 494ms |
| 0 / 0 |
