Thema: Delphi Ordung muss sein

Einzelnen Beitrag anzeigen

Hansa

Registriert seit: 9. Jun 2002
Ort: Saarland
7.554 Beiträge
 
Delphi 8 Professional
 
#32

Re: Ordung muss sein

  Alt 4. Okt 2003, 17:52
Zitat von negaH:
...Angenommen 3 Kugeln wurden schon gezogen, dann verbleiben 46 Kugeln in der Urne und somit muß es Random(46) heissen...
Und genau da habe ich aufgehört. Ich käme dann an die 47..49 nicht mehr dran, sofern sie nicht zufällig bereits gezogen sind. Mehrfachziehung geht aber mit meinem Code trotzdem nicht. Bereits gezogene Kugeln werden einfach ignoriert und es wird neu gezogen, was bei Ziehung 48 aus 49 aber echt nicht besonders wäre. Zum Schluß hätte man dann noch 2 Kugeln und der Zufallsgenerator braucht ewig 3..49 zu durchsuchen, die auszuschließen und neu anzufangen, bis er endlich bei 1 oder 2 landet. Bei 6 aus 49 und EINER Ziehung ist es allerdings meiner Ansicht nach so machbar. Zumindest für eine 3 in der Schule. Richtig machen würde ich das auch mit 2 Listen, statt 2 Sets.

Und wegen der in diesem Fall klar begrenzten und kleinen Zahlenmengen gehts wie gesagt auch mit Arrays.
Gruß
Hansa
  Mit Zitat antworten Zitat