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

Random элементов массива.   Найти похожие ветки 

 
Сергей Ж.   (2003-09-27 00:02) [0]

Есть массив упорядоченный. Как сделать так, чтобы элементы его хаотично перемешались?


 
Zacho ©   (2003-09-27 00:29) [1]

Например, так:
var
i,r,tmp:integer;
begin
for i:=Low(MyArray) to High(MyArray) do
begin
tmp:=MyArray[i];
r:=Random(High(MyArray))+Low(MyArray);
MyArray[i]:=MyArray[r];
MyArray[r]:=tmp;
end;
end;



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

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



Память: 0.44 MB
Время: 0.015 c
1-27501
SergeyM
2003-09-25 17:43
2003.10.09
Заполнение массива


14-27643
Johnny Smith
2003-09-19 15:53
2003.10.09
Опрос на тему:


1-27519
k_len
2003-09-26 11:03
2003.10.09
Форма


3-27391
vchris
2003-09-18 14:41
2003.10.09
доступ к DBASE таблицам


1-27577
sagchat
2003-09-29 14:06
2003.10.09
Как мне показывать случайную строку из memo или из файла




   Наверх