Para almacenar el programa:
Nota: Si usted almacena este programa en su directorio HOME estará
disponible desde cualquier otro sub-directorio que usted utilice.
Para ver el contenido del programa use J ‚@CRMC.
programa es el siguiente:
« DUP
« 1 SWAP FOR j OBJ
n
→
ROLL END NEXT IF n 1 > THEN 1 n 1 - FOR j j 1 + ROLL
NEXT END n COL
Para utilizar este programa, en modo de RPN, escriba las n listas en el orden
que usted las desea como columnas de la matriz, escriba el valor de n, y
presione @CRMC. Como ejemplo, intente el ejercicio siguiente:
{1,2,3,4} ` {1,4,9,16} ` {1,8,27,64} ` 3 ` @CRMC
Las pantallas siguientes muestran la pantalla RPN antes y después de activar el
programa @CRMC:
Para utilizar el programa en modo ALG, presione @CRMC seguido por un par de
paréntesis („Ü). Dentro de los paréntesis escriba las listas de los datos
que representan las columnas de la matriz, separadas por comas, y finalmente,
una coma, y el número de columnas. La instrucción es la siguiente:
CRMC({1,2,3,4}, {1,4,9,16}, {1,8,27,64}, 3)
La pantalla ALG con la ejecución del programa CRMC se muestra a
continuación:
³~~crmc~ K
» »
→
ARRY IF j n < THEN j 1 +
→ →
El listado del
Página 10-18