Random zwischen zwei Zahlen

[Die Muhkuh]

Hiho,

ich hab ne Frage, die wahrscheinlich sau einfach ist aber ich kommt nicht drauf :oops:

Wie kann ich ne Zufallszahl zwischen z.b 50 und 100 erzeugen.

Man könnte z.b das ja so schreiben:

Delphi-Quellcode:

var
  a: Integer;
begin
  randomize;
  a := random(50)
  a := a + 50;
end;

Um ne zufallszahl zwischen 50 und 100 bekommt

Aber es gibt doch da bestimmt ne elegantere Lösung!

[Treffnix]

Das ist eigentlich die elegante Lösung

[neolithos]

Mir fällt keine ein

außer vielleicht

Delphi-Quellcode:

a := Random(50)+ 50; // für zw. 50..99
a := Random(51)+ 50; // für zw. 50..100

[Die Muhkuh]

hmm, gut dann kann man nix anderes machen! THX

[choose]

Rein mathematisch gibt es wohl nichts "einfacheres" als eine lineare Abbildung (hier: Addition), um alle Elemente eines Intervalls eineindeutig auf ein Bildinterval zu projezieren.

Falls Du aber diesen Fall häufiger hast, könntest Du Dir eine Hilfsfunktion schreiben in der Art

Delphi-Quellcode:

function MeinIntervall(const UntereGrenze, ObereGrenze: Integer): Integer;

oder

Delphi-Quellcode:

function MeinFloatervall(const UntereGrenze, ObereGrenze: Double): Double;

[Stanlay Hanks]

Hallo. In der Unit Maths gibt es eine Funktion RandomRange(Anfangswert,Endwert)
Die berechnet einen Wert zwischen Anfangswert und Endwert (irgendwo logisch :wink:)
Vielleicht hilft das weiter.

Man liest sich, Stanlay :hi:

[choose]

Hallo Stanley,

wenn ich das richtig lese, verwendet Spider D5.
In der Math-Unit von D5 (Enterprise) konnte ich die Funktion nicht finden, über D6 kann ich keine Aussage treffen. In D7 (Architekt) ist sie aber vorhanden.

[Die Muhkuh]

Unit Math! Wo gibt's die????


:wall: :wall: :wall: Hat gestern die Unit Math gelöscht :wall: :wall: :wall:

[MrKnogge]

die wird von Delphi mitgeliefert,
wobei bei dir wohl die funktion noch
nicht verfügbar ist.

Da dürfte allerdings auch nichts anderes
drinnen stehen wie oben gepostet wurde,
von daher halte ich diesefunction für sinnlos....

[Die Muhkuh]

Doch irengwo hier geistert eine Unit "Math" rum!
Und die Such ich!