cos()

cos(<ángulo>)

Retorna:

El coseno de un ángulo dado.

Descripción:

Calcula el coseno en milésimas del ángulo pasado como parámetro.

Los ángulos se manipulan siempre en milésimas de grado (ver el uso de ángulos en el lenguaje), y el coseno se devolverá igualmente en milésimas (como un valor de -1000 a 1000).

Por ejemplo, cos(0) devolverá 1000, ya que el coseno de 0 grados es 1.

PROGRAM ejemplo_cos;

GLOBAL
    ángulo[15];
    coseno[15];
    n;

BEGIN
    write(0,0,0,0,"Angulos");
    write(0,160,0,0,"Cosenos");
    FROM n=0 TO 15;
        ángulo[n] = rand(0, 360000);

        coseno[n] = cos(ángulo[n]); // Se calcula el coseno del ángulo

        write_int(0, 0,   20+n*10, 0, offset ángulo[n]);
        write_int(0, 160, 20+n*10, 0, offset coseno[n]);
    END
    write(0,0,192,0,"Pulse ESC para terminar ...");
    REPEAT
        FRAME;
    UNTIL (key(_esc));
END

Este programa imprimirá en pantalla una lista de ángulos, aleatoriamente escogidos entre 0 y 360000 (de 0 a 360 grados), y utilizará la función cos() para calcular el coseno de los mismos.