Entwickler-Ecke
Sonstiges (Delphi) - Zufalls Zahlen
MaximusMR - Sa 13.07.02 13:11
Titel: Zufalls Zahlen
Wie kann ich mir zum beispiel von der Zahl 1 - 10 einen Wert ZUFÄLLIG aussuchen lassen. also es soll keine Logik dahinter stehn. einfach immer zufallszahlen.
Gibt es da eine Anweisen?
Beitrag verschoben. Marc
Steffer - Sa 13.07.02 16:30
Schau mal in der Online-Hilfe nach Random
b.brecht - So 14.07.02 22:27
Normale Zufallszahl von 1-10:
Quelltext
1: 2: 3: 4:
| procedure zufall; begin random(11)+1; end; |
Mit Zufallsgenerator:
Quelltext
1: 2: 3: 4: 5:
| procedure zufall; begin randomize; random(11)+1; end; |
[/code]
GruppeCN - Mi 30.10.02 21:09
Titel: Mit Variable
:!:
Du kannst natürlich auch eine Variable verwenden:
Quelltext
1: 2: 3: 4: 5:
| var zahl: Integer;
randomize; zahl := random(11)+1; |
Das Plus 1 muss sein, da eine Zahl zwischen 0 und der Zahl erzeugt wird, also z.B. 0 oder höchstens 11.
Anonymous - Mi 30.10.02 23:33
Hier ist Randomize nicht richtig zu Geltung gekommen. Mit Random kriegst du zwar die Zufallszahlen, wenn du aber nicht vorher Randomize ausführst, dann bekommst du immer die gleichen Zufalszahlen ;)
Udontknow - Do 31.10.02 11:18
Hi!
Es sollen doch Zufallszahlen im Bereich 1-10 erzeugt werden, aber Random(11)+1 erzeugt welche im Bereich 1-11. Richtig wäre Random(10)+1 für den geforderten Bereich.
Cu,
Udontknow
Klabautermann - Do 31.10.02 11:58
Hallo,
Randomize solltest du nicht jedesmal vor dem Aufruf von Random ausführen. Mit Randomize Initialisierst du deinen Zufallsgenerator, wenn du es oft nacheinander machst (z.B. in einer Schleife) dann bekommst du immer sehr ähnliche Werte.
Deshalb rufe Randomize 1x z.B. beim Programmstart auf, danach nicht mehr.
Gruß
Klabautermann
Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2025 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!