14 lines
151 B
Text
14 lines
151 B
Text
|
PROC Main()
|
||
|
|
BYTE v
|
||
|
|
|
||
|
|
PrintE("Before loop")
|
||
|
|
DO
|
||
|
|
v=Rand(20)
|
||
|
|
PrintBE(v)
|
||
|
|
IF v=10 THEN
|
||
|
|
EXIT
|
||
|
|
FI
|
||
|
|
OD
|
||
|
|
PrintE("After loop")
|
||
|
|
RETURN
|