Turbo Basic 1.1.


Turbo Basic 1.1. - . 200


NEXT I%
EXIT DEF
CASE 2
DO
PRINT RND(%)
EXIT LOOP
LOOP
EXIT DEF
CASE 3
WHILE 1
PRINT RND(%)
EXIT LOOP
WEND
END SELECT
-116 -


PRINT " 3"
END DEF
'
' ,
PRINT FN(1)
PRINT FN(2)
PRINT FN(3)
INPUT " :"%
FOR %=1 to 2
CALL (%,%)
CALL (%,%)
NEXT %
END



EXP,EXP2,EXP10
----------------------
x x x
EXP e ;EXP10- 10 ;EXP2- 2 .
------

EXP:
--------- y=EXP(x)
EXP2:
y=EXP2(x)
EXP10:
y=EXP10(x)

EXP e x, x- , e--
--------- , 2.718252.
e^x. EXP
e :e=EXP(1)
EXP2 2 x , x -
. 2^x.
EXP10 10 x , x
. 10^x.
EXP,EXP2,EXP10 .

𠠠 FOR I=1 TO 10
PRINT USING " ##=####^^^^":I,EXP(I)