tan()

tan(<ángulo>)

Retorna:

La tangente de un ángulo dado.

Descripción:

Calcula la tangente 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 la tangente se devolverá igualmente en milésimas (como un valor dentro del rango min_int ... max_int).

Por ejemplo, tan(45000) devolverá 1000, ya que la tangente de 45 grados es 1.

PROGRAM ejemplo_tan;

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

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

        tangente[n] = tan(ángulo[n]); // Se calcula la tangente del ángulo

        write_int(0, 0,   20+n*10, 0, offset ángulo[n]);
        write_int(0, 160, 20+n*10, 0, offset tangente[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 tan() para calcular la tangente de los mismos.