RosettaCodeData/Task/Loops-Break/True-BASIC/loops-break.basic

14 lines
157 B
Text
Raw Permalink Normal View History

2023-07-01 11:58:00 -04:00
RANDOMIZE
DO
LET i = INT(RND * 19)
PRINT i; " ";
IF i = 10 THEN
EXIT DO
END IF
LET i = INT(RND * 19)
PRINT i; " ";
LOOP
PRINT
END