|
|
 |
|
» Estos son los 5 argumentos necesarios para crear la plantilla de entrada utilizando el comando INFORM: Título, lista de etiquetas, lista que indica el formato para las columnas, lista de valores para el comando RESET de la plantilla y la lista de valores iniciales para cada uno de los campos. |
|
|
 |
|
» El comando INFORM crea la plantilla de entrada y debe ir acompañado de la estructura condicional IF THEN END, ambos permiten el uso de las opciones OK y CANCL de la plantilla de entrada. OK: Permite la ejecución del código, CANCL: Cancela la ejecución del código. |
|
|
 |
|
» El procedimiento o subrutina toma los valores ingresados y los asigna a las variables locales respectivas. También se inicializan las variables 'n', 'FA' y 'FAB' como variables locales. |
|
|
 |
|
» Se inicia el procedimiento y con él la estructura condicional WHILE REPEAT END: Mientras 'ABS((B-A)/(2^n))' sea mayor que el valor del 'error' ingresado Repetir: |
|
|
 |
|
» INCR Incrementa la variable 'n' en una unidad y devuelve su valor incrementado. DROP borra el valor incrementado que no es necesario aquí. |
|
|
 |
|
» Calcula la función en el punto 'A' y almacena el resultado en la variable 'FA'. |
|
|
 |
|
» Calcula la función en el punto '(A+B)/2' y almacena el resultado en la variable 'FAB'. |
|
|
 |
|
» Devuelve la semisuma de los extremos del intervalo. Valor intermedio entre los puntos 'A' y 'B'. |
|
|
 |
|
» Si existe una raíz entre los puntos 'A' y '(A+B)/2' |
|
|
 |
|
» Entonces(2): Devolver la variable 'B', variable que representa al extremo derecho del intervalo inicial. Se toma el sub-intervalo izquierdo. |
|
|
 |
|
» En caso contrario(2): Devolver la variable 'A', variable que representa al extremo izquierdo del intervalo inicial. Se toma el sub-intervalo derecho.
Cierra la estructura IF. |
|
|
 |
|
» Almacena el valor de '(A+B)/2', calculado ateriormente, en la variable obtenida en la estructura IF anterior. Cierra el bucle indefinido WHILE. |
|
|
 |
|
» Devuelve los valores finales de las variables 'A' y 'B', cada uno de ellos etiquetado. |
|
|