|
VAR secretNumber: LONGINT; (* secret number out of [1..1024] *) guess: LONGINT; (* last guess *) |
Die Variablen secretNumber und guess
sind vom Typ LONGINT. LONGINT umfaßt
unserer Implementierung den gleichen Bereich wie INTEGER.
Die Verwendung von LONGINT ist hier notwendig, da
RandomGenerators.Val einen Wert vom Typ LONGINT
liefert.
| |
RandomGenerators.Val ist eine Funktion, die eine
pseudo-zufällige Zahl aus dem angegebenen Bereich liefert.
Diese Zahl wird in einer Zuweisung der Variablen
secretNumber zugewiesen.
|
secretNumber := RandomGenerators.Val(1, 1024); |
Copyright © 2004, 2005 Andreas Borchert, in HTML konvertiert am 18.02.2005 |