Turbo Basic 1.1.


Turbo Basic 1.1. - . 186


$DYNAMIC, DIM - ,


-106 -


DIM -
.
, , -
,
.

-_ -
.
, - (
), . -
.

. $DYNAMIC
FRE
$STATIC

𠠠 %=20
%=1
dim %(%:%)
for i%=% TO %
%(i%=% to %
%(i%)=int(rnd*10)
next i%
end


DO/LOOP
----------------

DO/LOOP - TRUE () FALSE ()
------- / .

DO[{WHILE!UNTIL}]
--------- .
. [EXIT LOOP]
.
[LOOP!WEND][{WHILE!UNTIL}]

- ,
--------- TRUE, -FALSE.
DO LOOP -
.
, . DO
LOOP . DO