Hi folks,

ich möchte eine funktion realisieren
bin aber über die zu verwendende arithmetik
noch nicht klar.
Die funktion soll zwischen 0 und 1 entscheiden.
Allerdings soll die häufigkeit zwischen beiden
beieinflussbar sein. So soll zB. 10mal für 0 aber
dann 1mal für 1 entschieden werden. Wann das geschiet
ist weitesgehend egal, ob zwischen 0....10 an zweiter,
fünfter oder achter stelle.
Ich hoffe es so beschrieben zu haben, das Ihr wißt
was ich meine

Gruß
Privateer

Meinst du vielleicht sowas?

markieren

Delphi-Quellcode:

function NullOderEins(WieOftNull: Integer): Boolean;
begin
  if Random(100) < WieOftNull then
    result := 0;
  else
    result := 1;
end;

zusammenfalten · markieren

Delphi-Quellcode:

Function NullOderEins(Prozent:double):integer;
begin
   if prozent <= 0.0 then
      result := 0
   else if prozent >= 100.0 then
      result := 1
   else if Random > (prozent / 100.0) then
      result := 1
   else
      result := 0;
end;

PS: erstauntlich gleicher Funktionsname, aber ich hab nicht abgeschrieben

Hallo,

vielleicht ein Ansatz:

markieren

Delphi-Quellcode:

randomize;

zahl:=random(10);
if zahl > 9 then
   zahl := 1
else
  zahl := 0;

Grüße
Klaus

Hier noch ein Link auf einen älteren thread zum Thema: Zufall mit Wahrscheinlichkeit 1:X generieren

Grüße vom marabu

vielen Dank Leute
ich werde das ausprobieren!
Danke