Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Random [D6, WinXP]

sergAP © (2006-04-21 11:56:00)
Подскажите, такая ситуация
имеется список вопросов (пример 100 шт);
используя случайный выбор (random) - выподает 20-тый вопрос.
как сделать что бы 20-тый больше не выпал из этого же списка,
и выборка пошла из 99-ти (без 20-го)?

заранее благодарен
neo_cleaner

DevilDevil (2006-04-21 22:27:00) [1]
сделать статический на 100 или динамический массив : boolean

SuperBug (2006-04-21 19:06:00) [2]
Использовать множество (var s:Set of byte) , при получении номера проверять if NUM in s -> новый номер если нет -> добавить его в s (s:=s+[NUM])

vl_chel (2006-04-21 14:10:00) [3]
Поиметь массив со списком выданных вопросов а дальше как в "Что Где Когда" вопрос обработан переходим к следуешему

Сергей М. (2006-04-21 12:04:00) [4]
while StringList.Count > 0 do begin
i := Random[StringList.Count];
ShowMessage(StringList[i]);
StringList.Delete(i);
end;

Desdechado (2006-04-21 11:58:00) [5]
перед выдачей вопроса проверять список использованных на предмет наличия в нем только что сгенерированного
если есть, повторить генерацию

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »