24 lines
373 B
Plaintext
24 lines
373 B
Plaintext
|
|
IMPORT util
|
|
MAIN
|
|
DEFINE i SMALLINT
|
|
DISPLAY "Before srand() call:"
|
|
FOR i=1 TO 3
|
|
DISPLAY util.Math.rand(100)
|
|
END FOR
|
|
CALL util.Math.srand()
|
|
DISPLAY "After srand() call:"
|
|
# FOR i=1 TO 3
|
|
DISPLAY util.Math.rand(150000)
|
|
# END FOR
|
|
END MAIN
|
|
{
|
|
|
|
65828
|
|
46131
|
|
112163
|
|
|
|
92251
|
|
38343
|
|
67513
|
|
} |