Thema: Delphi belibig oftes Würfeln

Einzelnen Beitrag anzeigen

Benutzerbild von inherited
inherited

Registriert seit: 19. Dez 2005
Ort: Rosdorf
2.022 Beiträge
 
Turbo Delphi für Win32
 
#23

Re: belibig oftes Würfeln

  Alt 3. Feb 2007, 18:54
Zitat von Hawkeye219:
Zitat von inherited:
Delphi-Quellcode:
for i := 1 to AnzahlDerWuerfe do
  WurefelErgebnisse[random(6)+1]:=WurefelErgebnisse[random(6)+1]+1;
Das kann man dann wirklich als _zufälliges_ Ergebnis bezeichnen

Gruß Hawkeye
Ist mir auch gerade aufgefallen
Das random erstmal in einen Int packen und dann...
peinlich.
UND DAS IST EINE SCHLEIFE herrgott!
Nikolai Wyderka

SWIM SWIM HUNGRY!
Neuer Blog: hier!
  Mit Zitat antworten Zitat