12 lines
437 B
Text
12 lines
437 B
Text
pi = 4.0 * ATAN(1.0)
|
|
dtor = pi / 180.0
|
|
rtod = 180.0 / pi
|
|
radians = pi / 4.0
|
|
degrees = 45.0
|
|
|
|
WRITE(ClipBoard) SIN(radians), SIN(degrees*dtor)
|
|
WRITE(ClipBoard) COS(radians), COS(degrees*dtor)
|
|
WRITE(ClipBoard) TAN(radians), TAN(degrees*dtor)
|
|
WRITE(ClipBoard) ASIN(SIN(radians)), ASIN(SIN(degrees*dtor))*rtod
|
|
WRITE(ClipBoard) ACOS(COS(radians)), ACOS(COS(degrees*dtor))*rtod
|
|
WRITE(ClipBoard) ATAN(TAN(radians)), ATAN(TAN(degrees*dtor))*rtod
|