Turbo Basic 1.1.


Turbo Basic 1.1. - . 198


- :
n :
(Error n at pgm-ct :)
n- ,- -
.

𠠠 DEF FN %=(x%)
IF x%>65 THEN
ERROR 5 '
ELSE
FN%=x%+100
ENDIF
END DEF
PRINT FN(65) '


EXIT
-------------

EXIT .
-------

EXIT{SELECT!DEF!FOR!IF!LOOP!SUB!WHILE}
---------

EXIT
--------- - , -
. , EXIT, -
, , EXIT :
--------------------------------------------------
EXIT- EXIT
--------------------------------------------------
SELECT SELECT
DEF
FOR FOR/NEXT
IF IF-
LOOP DO/LOOP
SUB
WHILE WHILE/WEND
--------------------------------------------------
EXIT GOTO.

-115 -


EXIT , -
----------- EXIT.

' EXIT.