Turbo Basic 1.1.


Turbo Basic 1.1. - . 50


FOR T=0 TO 2*n STEP 2*n/
=COS(2*T)
X=*SIN(1*T)
-200 -


Y=*SIN(2*T)
PSET (X,Y)
NEXT T
WHILE NOT INSTAT:WEND
END

WRITE
--------------

WRITE .
-------
WRITE [ ]
---------
- /
--------- ,
. , .WRITE
PRINT, , WRITE
,
.
.堠 PRINT
FOR I=1 TO 3
READ $,%
PRINT $
PRINT %
WRITE $,%
NEXT I
DATA " ",10,"",20,"",30
END

WRITE#
---------------

WRITE# .
-------
WRITE#,
---------
- ,
--------- .
- / -
6 .WRITE# PRINT#
, , WRITE#
, -
.
WRITE#
,