Turbo Basic 1.1.


Turbo Basic 1.1. - . 295


, -
TRUE (), ,
CASE-.
, END SELECT.
SELECT

.
-
, IF.
. END SELECT
--------- EXIT CASE

INPUT " ", x
------ SELECT CASE x
CASE < 10
PRINT " "
CASE < 1000
-181 -


PRINT " "
CASE 1111,2222,3333,4444
PRINT " "
CASE ELSE
PRINT " "
END SELECT


SGN
------------
SGN .
-----------
y=SGN ( )
--------
, SGN +1.
0, SGN 0.
, SGN -1.
ON/GOTO ON/GOSUB SGN
, :
ON SGN () + 2 GOTO , ,

. ON/GOSUB
--------- ON/GOTO

" x y 0
------ x=0;y=0
" x y
INPUT ", x";x