13 lines
170 B
Turing
13 lines
170 B
Turing
|
$$ MODE TUSCRIPT
|
||
|
|
LOOP
|
||
|
|
a=RANDOM_NUMBERS (0,19,1)
|
||
|
|
IF (10==a) THEN
|
||
|
|
PRINT "a=",a
|
||
|
|
STOP
|
||
|
|
ELSE
|
||
|
|
b=RANDOM_NUMBERS (0,19,1)
|
||
|
|
PRINT "a=",a," b=",b
|
||
|
|
ENDIF
|
||
|
|
IF (10==a,b) STOP
|
||
|
|
ENDLOOP
|