COS - Cosinus

Die COS-Funktion liefert den Cosinus des Winkels oder Bogens, der in argument-1 im Bogenmaß angegeben ist.
Funktionstyp: numerisch.

Format

---

FUNCTION COS (argument-1)

---

Argument

1. argument-1 muss der Klasse numerisch angehören.

Returnwert

1. Der Returnwert ist der Cosinus von argument-1 und ist größer oder gleich -1 und kleiner oder gleich +1.

Siehe auch:        ACOS, SIN, ASIN, TAN, ATAN

Beispiel 9-8

...
DATA DIVISION.
WORKING-STORAGE SECTION.
01  R PIC S9V9(10).
01  RES PIC -9.9(10).
PROCEDURE DIVISION.
P1 SECTION.
MAIN.
    COMPUTE R = FUNCTION COS (3.1425).
    MOVE R TO RES.
    DISPLAY RES UPON T.
    STOP RUN. 

Ergebnis: -0.9999995883