Randomize Turbo Pascal

aus Paswiki Turbo Pascal, der freien Wissensdatenbank

Beschreibung

Der Befehl Randomize initialisiert den Zufallsgenerator mit einem Wert der sich aus der System-Zeit und dem Datum ergibt. Gespeichert wird dieser Wert in der Globale LongInt-Variablen namens RandSeed. Wenn man RandSeed einen festen Wert zuweist, kann man dadurch erreichen, das immer die gleiche Abfolge von Zufallszahlen generiert wird.

Vor dem ersten Random-Aufruf muss der Befehl Randomize ausgegeben werden. Ist das nicht der Fall, so wird der Zufallsgenerator immer mit der selben Zahl initialisiert => gleiche Ergebnisse.

Deklaration

procedure Randomize;

Beispielprogramme

begin
randomize;
write('die Zufallszahl zwischen 1 und 100 ist : ',random(100));
readln;
end.

---