Forum: Programmieren allgemein
by alzaimar,
26. Okt 2005
Absicht nicht, nur morgentliche Demenz... Werd ich gleich mal verbessern :oops:
Forum: Programmieren allgemein
by alzaimar,
26. Okt 2005
Zufällige Auswahl mit Gewichtung:
Sei B die Liste der Banner, und P die der dazugehörigen Punkte. B (0<=i<n) ist das i.te Banner und P seine Punktzahl.
Dann liefert folgende Funktion einen Index i (0<=i<n), bei dem die Gewichtung P berücksichtigt wird:
Function WeighedIndex (P : Array Of Integer) : Integer;
Var
I,J,S : Integer;
Begin
S := 0;
For i:= Low (P) to High(P) do // Alle...