Turbo Basic 1.1.


Turbo Basic 1.1. - . 173


!,#
print (0)
print (1)
print %,&,!,-
#



COS
-----------

COS
-------

y=COS( )
---------

- , . -
--------- , 180/n.
n/180(.
ATN).COS .

.堠 ATN
SIN
TAN

pi=atn(1)*4
for i%=0 to 360 step 45
print using " ### =##.##":i%,cos(pi#/180*i%)
next i%
end


CSNG
------------

CSNG -
------- .

y=CSNG( )
---------

CSNG -
--------- .CSNG -
.

.堠 CDBL
CINT
CLNG

𠠠 print csng (&HFFF),csng(12345.1234),csng(&HF000)


- 98 -





CSRLIN
--------------

CSRLIN ( )
-------

y=csrlin
---------