Ergebnis der Suchanfrage

• Forum: Datenbanken

  Re: Denkanstoß: Brauche gewichtete "Zufallszahlen"

    Delphi
    by Progman, 22. Nov 2007
  Warum nicht einfach:
  x:=Random(2000);
  if x < 20 then Level:=5 else //0..19, kommt sicher recht selten vor
  if x < 100 then Level:=4 else //20..99, kann schon etwas öfter passieren
  if x < 300 then Level:=3 else //100..299, noch öfter
  if x < 800 then Level:=2 else //300..799, schon relativ großer Bereich
  Level:=1; //800 .. 1999, größter Bereich, hier wirds wohl die...