Forum: Datenbanken
Delphi
by shmia,
23. Jun 2004
Eigentlich nicht. Ein Array wird mit den Zahlen 0..99 befüllt:
Dann wird jedes Element mit einem zufälligen Element vertauscht:
// 1. Durchgang
// 2. Durchgang
// 3. Durchgang (3<->99)
Ein Element könnte auch mit sich selber vertauscht werden, aber das macht nix.
Nach 100 Vertauschungen ist garantiert Unordnung, obwohl wahrscheinlich schon nach
50 Vertauschungen genügend...
Forum: Datenbanken
Delphi
by shmia,
23. Jun 2004
Angenommen, du hast 100 Fragen (0-99).
Dann füllst du zuerst ein dynamisches Array mit diesen Zahlen und tauscht zufällig immer 2 Einträge aus.
var
QIndex:array of Integer; // globales Array
AktuelleFrage:integer;
procedure SetupQIndex;
var
i, randomIndex,tmp : integer;