|
Registriert seit: 14. Mär 2003
Ort: Osnabrück
244 Beiträge
Delphi 2009 Professional
|
Re: Wahrscheinlichkeiten festlegen
27. Jun 2005, 12:45
Zitat von Toxman:
Für den BWINF hatte ich mal ein ähnliches Problem und hab es so gelößt:
Delphi-Quellcode:
// das Ereigniss tritt mit p% ein
if random <= (p/100) then showmessage('Ereigniss eingetreten');
Da hast du auch nicht den Aufwand, dass du für deine zufällige Zahl eine Variable brauchst und die auch noch auf odd oder nicht untersuchen musst. Der Code wird so nicht funktionieren... Wenn wir nun eine 0% Wahrscheinlichkeit haben wollen und es kommt 0 bei Random raus so wird deine Funktion trozdem True geben...
Greetz
Boombuler
"Look at you, Hacker. A pathetic creature of meat and bone, panting and sweating as you run through my corridors. How can you challenge a perfect, immortal machine?"
SwapIt Highscore:
|