Allgemeine Informatik I - Hinweise zu Blatt 8
- Hier zwei Beispiele für Prozeduren:
- Um bessere Zufallszahlen zu erhalten (die anderen waren nicht so toll), könnt ihr eine der beiden folgenden Methoden verwenden:
-
zz := (171*zz+11213) MOD 53125;
zahl := (zz MOD (max-min+1))+min;
- Es gibt ein Modul namens RandomGenerator, was Zufallszahlen erzeugt:
...
FROM RandomGenerator IMPORT Random;
...
zahl := Random(a,b); (* ergibt eine INTEGER-Zahl aus dem Intervall [a,b] *)