Вниз
Скачать: CL | DM;

Рандомный вывод массива   Найти похожие ветки 

 
Nous Mellon_   (2008-01-20 16:50) [0]

Доброе время суток, друзья! Не подскажете простой и эффективны алгоритм, можно кусок кода на делфи\пхп который бы реализовывал следующую задачу. Есть некоторый массив "a" из 100 элементов. Нужно вывести его на экран, но не последовательно, а рандомно, например сначала 5й, потом 9й, потом 24й, и так все 100 в итоге.


 
@!!ex ©   (2008-01-20 16:53) [1]

> [0] Nous Mellon_   (20.01.08 16:50)

Отсортируй массив в случайном порядке.
var
 i:integer;
 newPos:integer;
 tmp:Value;
begin
for i:=0 to 99 do begin
 tmp:=Items[i];
 newPos:=Random(100);
 Items[i]:=Items[newPos];
 Items[newPos]:=tmp;
end;
end


 
Anatoly Podgoretsky ©   (2008-01-20 17:02) [2]

> Nous Mellon_  (20.01.2008 16:50:00)  [0]

Обычная сортировка, перестановкой по Random


 
ketmar ©   (2008-01-20 17:33) [3]

>[1] @!!ex ©(20.01.08 16:53)
>Отсортируй массив в случайном порядке.

порвало.


 
Nous Mellon_   (2008-01-20 18:14) [4]

Все понял, большое спасибо!


 
homm ©   (2008-01-20 18:16) [5]

Не обязательно портить исходный массив для вывода.


 
Kerk ©   (2008-01-20 18:20) [6]

http://rsdn.ru/Forum/message/453591.flat.aspx
оно?



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.015 c
2-1201712168
AlexanderMS
2008-01-30 19:56
2008.02.24
Как "разбить" 1 байт на 4 группы по 2 бита.


15-1201238844
user_
2008-01-25 08:27
2008.02.24
QT и БД FireBird


4-1183721054
shamanski
2007-07-06 15:24
2008.02.24
Часы реального времени (RTC Alarm)


15-1201008015
Vendict
2008-01-22 16:20
2008.02.24
Аудит в Windows


2-1201686554
Guriev
2008-01-30 12:49
2008.02.24
(Работа с ADO) Kак организовать создание отчёта (НЕ таблицу)?




   Наверх