Turbo Basic 1.1.


Turbo Basic 1.1. - . 190


頠 5/6 5/12 8.76/12
򠠠 򠠠 򠠠 9.57/12
----------------------------------------------------------------
X VARPRT$() ,..-
DRAW .X- -
GOSUB;:
DRAW "X"+VARPRT$(x$)
P , (x,y) -
, .
n,x y -

=VARPRT$();
:
DRAW "e15"
,
=15
DRAW "e="+VARPRT$(a)
DRAW - -
, DRAW- .

- DRAW .-
DRAW-
VARPRT$(n). DRAW "U=I%"
DRAW "U="+VARPRT$(I%)

𠠠 screen 1
$="u20 c5 e20 h5 d20 l30
draw $
draw "be3"
draw "p1,3"


-109 -


for i%=1 to 280 step 40
draw "m="+varprt$(i%)+",40"
draw $
next i%
end

END
------------

END
------- .

END[{DEF!IF!SELECT!SUB}]
---------

END . END