acos(<coseno>)
Retorna:
El arcocoseno de un coseno dado.
Descripción:
Calcula el arcocoseno del coseno pasado como parámetro en milésimas, es decir, se obtiene el ángulo correspondiente a un coseno (operación inversa al coseno, que se puede obtener con la función cos()).
Los ángulos se manipulan siempre en milésimas de grado (ver el uso de ángulos en el lenguaje), por ello el arcocoseno se devuelve también en milésimas.
El <coseno> se requiere como un valor de -1000 a 1000 (de -1.0 a +1.0), y el resultado se devuelve como un ángulo entre 0 y 180000 (de 0 a 180 grados).
PROGRAM ejemplo_acos; GLOBAL coseno[15]; ángulo[15]; n; BEGIN write(0,0,0,0,"Coseno"); write(0,160,0,0,"Arcocoseno(ángulo)"); FROM n=0 TO 15; coseno[n] = rand(-1000, 1000); ángulo[n] = acos(coseno[n]); // Se calcula el arcocoseno de un coseno write_int(0, 0, 20+n*10, 0, offset coseno[n]); write_int(0, 160, 20+n*10, 0, offset ángulo[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 cosenos, aleatoriamente escogidos entre -1000 y 1000 (se representan en milésimas), y utilizará la función acos() para calcular el arcocoseno de los mismos.