PRÁCTICA 13

LENGUAJE ENSAMBLADOR 80386 PRÁCTICA 13 

AUTOR: PROFESOR SALVADOR SAUCEDO FLORES 

EDICIÓN: PROFESOR PABLO FUENTES RAMOS 

PRÁCTICA 13 

SUMA, RESTA, MULTIPLICACIÓN Y DIVISIÓN DE DOS NÚMEROS 

REALES DE PUNTO FLOTANTE DE PRECISIÓN SENCILLA, SEGÚN 

NORMA IEEE-754 

1 INTRODUCCIÓN 

Mediante esta práctica trabajaremos con números reales de precisión 

sencilla, según el estándar IEEE-754 y haremos las operaciones básicas de 

suma, resta, multiplicación y división de dos números de punto flotante, 

necesitándose por fuerza de un microprocesador 80386 o más reciente que 

cuente con coprocesador matemático. 

2 OBJETIVOS 

Al término de esta práctica el alumno podrá: 

2.1 Trabajar con rutinas aritméticas que usan el procesador numérico. 

2.2 Realizar operaciones básicas y exhibir el resultado 

2.3 Hacer que un programa revise si el procesador numérico está disponible 

3 DESARROLLO 

3.1 Capturar los siguientes los siguientes cuatro módulos, ensamblarlos 

y meterlos a la librería PF. 

%TITLE “INICIA87.ASM INICIALIZA EL PROCESADOR NUMÉRICO 80387” 

; Ensamblar y poner en librería PF.LIB 

; 

; Llamar con: AX = palabra de control para fijar redondeo, modo, bits de precisión, máscara de excepciones 

; 

; Retorna: (si el coprocesador está presente) bandera ZF = puesta (1) 

; 

; (Si coprocesador no hallado) ZF = falsa (0) 

; 

; Destruye: nada 

IDEAL 

MODEL small 

13-1


codeseg 

PUBLIC Inicia87 

PROC Inicia87 

push bx ax ;salva registros 

mov ax,-1 ;pone FFFFH en la pila 

push ax 

mov bx,sp ;la hace direccionable 

fninit ;trata de inicializar el coprocesador 

fnstsw [ss:bx] ;trata de traer palabra de estado 

pop ax ;si 8 bits bajos son cero, 

or al,al ;el coprocesador está presente 

jnz @@10 ;salta si no hay coprocesador 

fldcw [ss:bx+2] ;carga al coprocesador la palabra de control 

@@10: 

pop ax bx ;restaura registros 

ret ;y regresa el resultado en la bandera Z 

ENDP Inicia87 

end 

%TITLE “FALOG.ASM CALCULA ANTILOG COMÚN EN 80387” 

; 

; FALOG.ASM calcula el antilogaritmo en 80387 

; 

; Llamar con: ST(0) = argumentos 

; 

; Retorna: ST(0) = antilogaritmo de base 10 

; 

; Usa: registros del CPU se preservan, usa tres celdas de la pila del coprocesador 

; 

; Nota: Para obtener antilogaritmo natural, reemplazar “fldl2t” con la instrucción “fldl2e”. 

; 

; Estar seguro que el coprocesador ha sido iniciado con un llamado previo a INICIA87! 

IDEAL 

MODEL small 

Codeseg 

vieja equ [word bp-4] ;palabra original de control 

nueva equ [word bp-2] ;palabra nueva de control 

PUBLIC falog 

PROC falog 

push ax ;salva registros y 

push bp ;forma apuntador 

mov bp,sp ;para variables locales 





sub sp,4 

fldl2t ;carga log2(10) 

fmulp st(1),st(0) ;log2(10) * argumento 

fld st(0) ;duplica el producto 

fstcw vieja ;trae palabra vieja de control 

fwait ;espera 

mov ax,vieja ;cambia modo de redondeo 

and ax,0f3ffh ;a “hacia abajo” 

or ax,0400h 

mov nueva,ax 

fldcw nueva ;fija modo de redondeo 

frnint ;trae parte entera del producto 

fldcw vieja ;restaura modo original de redondeo 

fld st(0) ;duplica parte entera 

fxch st(2) ;trae producto original 

fsubrp st(1),st(0) ;halla parte fraccional 

fld1 

fchs 

fxch st(1) ;escala parte fraccional 

fscale 

fstp st(1) ;descarta basura del coprocesador 

f2xm1 ;eleva 2 a la -1 

fld1 

faddp st(1),st(0) ,corrige por el -1 

fmul st(0),st(0) ;hace resultado al cuadrado 

fscale ;escala por parte entera 

fstp st(1) ;tira basura del coprocesador 

add sp,4 ;descarta variables locales 

pop bp ;restaura registros y 

pop ax ;retorna resultado en ST(0) 

ret 

ENDP falog 

end ;fin de módulo FALOG.ASM 

%TITLE “ATOF – CONVERSIÓN DE ASCII A BINARIO DE PUNTO FLOTANTE” 

; Ensamblarlo y ponerlo en librería PF 

; 

; ATOF.ASM Convierte cadena ASCII a número binario de punto flotante en la pila de 80387 

; (También requiere FALOG en FALOG.ASM 

; 

; Llamar con DS:DI = dirección de ka cadena con la forma 

; [signo][digitos][.[digitos]][E\e[signo][exp]] se ignoran espacios y tabuladores delanteros 

; 

; Retorna: ST(0) = valor binario en punto flotante DS:SI = dirección+1 del terminador 

; 

; Usa: nada 

; 

; Esta rutina no advierte en el caso de que haya sobre flujo y termina con el primer 

; carácter no valido 

; Asegurarse de que el 80387 ha sido previamente iniciado con una llamada previa a INICIA87! 

blanco equ 20h ;ASCII de carácter blanco 





tab equ 09h ;ASCII de carácter tabulador 

IDEAL 

MODEL small 

dataseg 

Int10 dw 10 ;constante entera 10 

Digito dw 0 ;dígito convertido actual 

Lugares dw 0 ;número de lugares decimales 

codeseg 

EXTRN falog:near ;se necesita la rutina FALOG 

PUBLIC atof 

PROC atof ;ASCII a punto flotante 

push ax cx dx ;salva registros 

call convierte ;convierte la mantisa 

neg dx ;salva -1 * lugares decimales 

mov [lugares],dx 

or al,20h ;mantiene carácter para minúsculas 

cmp al,’e’ ;¿está el exponente presente? 

je @@10 ;si, salta 

fldz ;asume exponente cero 

jmp @@20 

@@10: 

call convierte ;convierte exponente 

@@20: 

fiadd [lugares] ;ajusta exponente para dec. lugares en mantisa 

call falog ;eleva a la potencia 10 

fmul ;exponente * mantisa 

pop dx cx ax ;restaura registros 

ret ;retorna ST(0) = resultado 

ENDP atof 

; 

; CONVIERTE: Llamada por ATOF para convertir un número ASCII con posible signo y/0 punto decimal 

; Entrada: DS:SI = dirección de la cadena 

; Retorna: ST(0) = resultado 

; AL = primer carácter no convertible 

; DX = número de dígitos tras el punto decimal 

; DS:SI = dirección +1 del carácter en AL 

; Usa: AH,CX 

; 

PROC convierte ;convierte campo numérico 

fldz ;inicializa resultado 

xor cx,cx ;inicializa signo 





mov dx,-1 ;inicializa conteo decimal 

@@10: 

lodsb ;elimina espacios 

cmp al,blanco ;ignora blancos delanteros 

je @@10 

cmp al,tab ;ignora tabuladores delanteros 

je @@10 

cmp al,’+’ ;verifica si un + precede 

je @@20 ;si, salta 

cmp al,’-‘ ;¿es el símbolo -? 

jne @@30 ;no, prueba si numérico 

dec cx ;si, pone bandera 

@@20: 

lodsb ;trae siguiente carácter 

@@30: 

cmp al,’0’ ;¿es carácter válido? 

jb @@40 ;salta si no ‘0’ a ‘9’ 

cmp al,’9’ 

ja @@40 ;salta si no ‘0’ a ‘9’ 

and ax,0fh ;aísla cuatro bits bajos 

mov [digito],ax ;y salva valor del dígito 

fimul [int10] ;valor previo * 10 

fiadd [digito] ;acumula nuevo dígito 

or dx,dx ;¿pasó punto decimal? 

js @@20 ;no, convierte siguiente dígito 

inc dx ;si, cuenta dígitos 

jmp @@20 ;convierte siguiente dígito 

@@40: 

cmp al,’.’ ;¿es el punto decimal? 

jne @@50 ;no, proceder 

inc dx ;indica punto decimal hallado 

jmp @@20 ;convierte más dígitos 

@@50: 

jcxz @@60 ;salta si resultado positivo 

fchs ;hace resultado negativo 

@@60: 

or dx,dx ;¿halló punto decimal? 

jns @@70 ;si, salta 

xor dx,dx ;retorna cero lugares 

@@70: 

ret ;retorna ST(0) = resultado 

ENDP convierte 

end ;fin de módulo ATOF.ASM 





%TITLE “FTOA – PUNTO FLOTANTE A ASCII” 

; Ensamblarlo y ponerlo en librería PF 

; 

; FTOA.ASM – Convierte binario de punto flotante 

; Número real en la pila del 80387 Stack en ASCII (usa FALOG de FALOG.ASM) 

; 

; Llamar con ST(0) = número de punto flotante 

; DS:DI = área para recibir cadena 

; 

; Retorna: DS:SI = dirección de cadena convertida 

; AX = largo de la cadena 

; Pila del coprocesador “sube” 

; 

; Usa: nada 

; 

; Asegurarse de que el coprocesador ha sudo iniciado adecuadamente con una llamada previa a INICIA87! 

IDEAL 

MODEL small 

dataseg 

signo dw 0 ;recibe estado FXAM 

viejo dw 0 ;modo de redondeo previo 

nuevo dw 0 ;nuevo modo de redondeo 

exp dw 0 ;potencia de 10 

status dw 0 ;recibe estado ICOM 

mant dt ;mantisa como valor BCD 

fp1317 dq 1,0e17 ;constante para escalamiento 

fp1e18 dq 1,0e18 ;constante para escalamiento 

int10 dw 10 ;constante par escalamiento 

CadOp db ‘+0.000000000000000000E+000’ ;exhibido si 

LonOp equ offset CadOn-offset CadOp ;ST(0) = +0 

CadOn db ‘-0.000000000000000000E+000’ ;exhibido si 

LonOn equ offset CadIp-offset CadOn ;ST(0) = -0 

CadIP db ‘’ ;exhibido si 

LonIP equ offset CadIn-offset CadIp ;es infinito positivo 

CadIN db ‘’ ;exhibido si ST(0) 

LonIN equ offset CadNatN-offset CadIN ;es infinito negativo 

CadNaN db ‘’ ;exhibido si ST(0) 

LonNaN equ offset CadAn-offset CadNaN ;contiene Not-A-Número 

CadAn db ‘’ ;exhibido para anormales 

LonAn equ offset CadDe-offset CadAn ;positivos y negativos 

CadDe db ‘’ ;exhibido para denormales 

LonDe equ offset CadVac-offset CadDe ;positivos o negativos 

CadVac db ‘’ ;exhibido si ST(0’) 

LonVac equ offset Tipofin-offset CadVac ;está marcado vacío 





Tipofin db 0 

codeseg 

EXTRN falog:near ;se usa rutina FALOG 

PUBLIC ftoa 

PROC ftoa ;punto flotante a ASCII 

push bx dx cx di es ;salva registros 

push ds ;hace que DS apunte a @data 

pop es 

fxam ;prueba tipo de número 

fstsw ;salva estado de FXAM 

fwait 

mov bx,[signo] ;retira estado y 

and bx,4700h ;aísla C3, C2, C1, C0 

rol bx,1 ;para formar un 

rol bx,1 ;con valor de 0-15, y luego 

shl bh,3 :*2 para formar índice de asalto 

rol bx,3 

shl bx,1 

jmp [cs: TipoTab+bx] ;salta según tipo de número 

@@10: 

fabs ;forza un número positivo 

fxtract ;extrae exponente 

fxch st(1) ;pone exponente encima 

fldlg2 ;forma potencia de 10 

fmulp st(1),st(0) 

fstcw [viejo] ;salva modo de redondeo actual 

fwait 

mov ax,[viejo] ;hace “1”s campo de redondeo 

or ax,0c00h ;modo “truncar” 

mov [nuevo],ax 

fldcw [nuevo] ;forza nuevo modo de redondeo 

fld st(0) ;duplica potencia de diez 

frndint ;halla parte entera del 

fist [exp] ;exponente y la salva 

fldcw [viejo] ;restaura modo de redondeo anterior 

fsubp st(1),st(‘0) ;halla parte fraccionaria de 

call falog ;potencia de diez 

fmulp st(1),st(0) ;multiplica por la mantisa 

fmul [ft1e18] ;escala mantisa par BCD 

frndint ;tira el remanente 

@@20: 

fcom ]fp1e17] ;¿es la mantisa < 1.0e17? 

fstsw [status] 

fwait 

mov ax,[status] 

sahf 

jae @@30 ;no, proceder 





fimul [int10] ;si, mantisa*10 

dec [exp] ;y decrementa exponente 

jmp @@20 

@@30: 

fcom [fp1e18] ;¿es la mantisa < 1.0e18? 

fstsw [status] 

fwait 

mov ax,[status] 

sahf 

jb @@40 ;si, proceder 

fidiv [int10] ;no, mantisa / 10 

inc [exp] ;e incrementa exponente 

jmp @@30 

@@40: 

fbstp [mant] ;salva mantisa en BCD 

fwait 

mov di,si ;direcciona cadena ASCII 

mov ,’+’ ;asume es positivo 

test [signo],200h ;verifica banderas de FXAM 

jz @@50 ;brinca, valor es positivo 

mov al,’-‘ 

@@50: 

stosb ;salva símbolo + o – 

mov al,’0’ ;salva cero delantero 

stosb 

mov al,’.’ ;pone punto decimal 

stosb 

mov bx,8 ;apunta a últimos dígitos BCD 

@@60: 

mov al,[byte bx+mant] ;convierte byte BCD a 

shr al,1 ;dos dígitos ASCII 

shr al,1 

shr al,1 

shr al,1 

call digit ;convierte nibble alto 

mov al,[byte bx+mant] 

call digit ;convierte nibble bajo 

dec bx ;procesa valores BCD 

jns @@60 ;hasta convertir 18 dígitos 

mov al,’E’ ;pone la E para exponente 

stosb 

mov bx,[exp] ;prueba signo del exponente 

mov al,’+’ 

or bx,bx 

jns @@70 ;brinca, exponente es positivo 

mov al,’-‘ 

neg bx ;valor absoluto del exponente 

@@70: 

stosb ;salva signo del exponente 





mov ax,bx ;convierte exponente a 

cwd ;tres dígitos ASCII 

mov cx,100 

div cx 

call digit ;exponente: dígito de cientos 

mov ax,dx 

cwd 

mov cx,10 

div cx 

call digit ;exponente: dígito de decenas 

mov ax,dx 

call digit 

@@80: 

mov ax,di ;retorna AX = longitud de cadenas 

sub ax,si ;y DS:SI dirección de cadenas 

pop es di dx cx bx ;restaura registros 

ret 

@@100: 

mov di,offset CadOp ;valor de +cero 

mov cx,LonOp 

jmp @@200 

@@110 

mov di,offset CadOn ;valor de –cero 

mov cx,LonOn 

jmp 

@@120: 

mov di,offset CadVac ;valor vacío 

mov cx,LonVac 

jmp @@200 

@@130: 

mov di,offset CadDe ;valor denormalizado 

mov cx,LonDe 

jmp @@200 

@@140: 

mov di,offset CadAn ;valor anormal 

mov cx,LonAn 

jmp @@200 

@@150: 

mov di,offset NaN ;valor NaN 

mov cx,LonNaN 

jmp @@200 

@@160: 

mov di,offset CadIP ;valor de +infinito 

mov cx,LonIP 

jmp @@200: 





@@170: 

mov di,offset CadIN ;valor de –infinito 

mov cx,LonIN 

@@200: 

xchg si,di ;SI = cadena enlatada 

push di, ;DI = área del llamador 

rep movsb ;copia cadena enlatada 

pop si ;restaura SI 

fstp st(0) ;descarta valor original 

jmp @@80 

TipoTab dw @@140 ;0000 +anormal 

dw @@150 ;0001 +NaN 

dw @@140 ;0010 –anormal 

dw @@150 ;0011 -NaN 

dw @@10 ;0100 +normal 

dw @@160 ;0101 +infinito 

dw @@10 ;0110 –normal 

dw @@170 ;0111 –infinito 

dw @@100 ;1000 +cero 

dw @@120 ;1001 vacío 

dw @@110 ;1010 –cero 

dw @@120 ;1011 vacío 

dw @@130 ;1100 +denormal 

dw @@120 ;1101 vacío 

dw @@130 ;1110 –denormal 

dw @@120 ;1111 vacío 

ENDP ftoa 

; 

; DIGIT: Convierte el nibble bajo en AL a un dígito ASCII y lo salva en dirección dada por ES:DI 

; Llamar con: AL = valor a convertir en bits 0-3 

; ES:DI =dirección donde poner carácter ASCII 

; Retorna: AL = sin cambio 

; ES:DI = dirección+1 

; 

PROC digit ;nibble a dígito ASCII 

push ax ;salva registro 

add al,’0’ ;convierte a carácter ASCII 

stosb ;salva el carácter 

pop ax ;restaura registro 

ret 

ENDP digit 

end ;fin de módulo FTOA.ASM 





3.2 Capturar el programa A387.ASM, ensamblarlo y crear el programa 

ejecutable 

%TITLE “SUMA, RESTA, MULTIPLICA Y DIVIDE NÚMERO CIENTÍFICOS” 

; Programa A387, tipo EXE. Suma, resta, multiplica y divide dos número reales 

; Ensamblarlo con: tasm /zi a387 

; Ligarlo con: tlink /v a387 

IDEAL 

MODEL small 

STACK 256 

P386N 

P387 

Dataseg 

C DB -17.35 ;número real de precisión sencilla 

D DB 7.153 ;ídem 

buff DB 17,18 dup (0) ;cadena queda en buff+2 

PROB DB ‘División por cero’,13,10,0 

ST80387 DW 0 

RECORD SW BSY:1,C3:1,TOP:3,C2:1,C1:1,C0:1,IT:1,X:1,P:1,U:1,O:1,Z:1,DE:1,I:1 

rc EQU 13 ;ASCII de retorno de carro 

nl EQU 10 ;ASCII de nueva línea 

ClaveFin DB 0 

saludo DB ‘Este programa encuentra la suma, la reta, el producto y’ 

DB ‘el cociente’,rc,nl 

DB ‘de dos números de punto flotante.’ 

DB ‘Usa el coprocesador 80387.’,rc.rc,nl 

DB ‘formato: [+//-][.][E/e][+/-]’,rc,nl,0 

RepCPU DB ‘El programa requiere por lo menos un 80386 con coprocesador’,rc,nl,0 

A DD 99.98999264 ;4 bytes para real sencillo 

B DD 17.01480361 ;ídem para destino 

suma DD 0 ;suma en BCD 

resta DD 0 ;resta en BCD 

multi DD 2 dup (0) 

ResSuma DB 26 dup (0) ;resultado de la suma 

ResResta DB 26 dup (0) ;resultado de la resta 

CadSuma DB ‘La suma es…….: ‘,0 

CadResta DB ‘La resta es……..; ‘,0 

Apr1er DB ‘Teclear primer número real…:’,0 

Apr2do DB ‘Teclear segundo número real…:’,0 

ResMulti DB 26 dup (0) 

CadMulti DB ‘El producto es…: ‘,0 

CadCociente DB ‘El cociente es….: ‘,0 

ResCociente DB 26 dup (0) 

codeseg 

EXTRN atof:near,ftoa:near,SacaCadena:near,SacaCadena2:near 

EXTRN Nuevalinea:near,cpu:near,Inicia87:near 





Entra: 

mov ax,@data ;inicia registro 

mov 

programa: 

ds,ax ;de segmento de datos 

mov es,ax 

call NuevaLinea ;salta línea 

call cpu ;indaga tipo de CPU 

cmp ax,386h ;por lo menos un 80386 

jae 

@@05: 

@@10 

mov di,offset RepCPU 

call SacaCadena ;avisa que saldrá 

mov ah,4ch ;función de DOS 

int 21h ;para salir 

@@10: 

mov ax,0000h 

call Inicia87 

jnz @@05 

mov di,offset saludo ;bienvenida e instrucciones 

call SacaCadena 

call NuevaLinea 

mov di,offset Apr1er ;pide primer número 


mov ah,0ah ;pide cadena de entrada 

mov dx,offset buff 

int 21h 

finit ;limpia pila de 387 y lo inicia 

mov si,offset buff+2 

call atof 

fstp [A] ;lo salva en A 

call NuevaLinea ;salta a siguiente línea 

mov di,offset Apr2do ;pide segundo número 


mov ah,0ah 

mov dx,offset buff 

int 21h 

mov si,offset buff+2 

call atof ;lo hace flotante 


fst [B] ;lo salva en B 

fadd [A] ;suma valor en RAM 


mov di,offset CadSuma ;exhibe letrero de resultado 

call SacaCadena ;de suma 

fst [D] ;salvamos resultado 

mov si,offset ResSuma 

call ftoa ;convierte a ASCII 

mov di,offset ResSuma 

mov cx,ax ;trae cantidad de caracteres 

call SacaCadena2 





; hace la resta… 

fld [A] ;trae primer número 

fsub [B] ;resta valor en RAM 


mov di,offset CadResta ;exhibe letrero de resultado 

call SacaCadena ;de suma 

fst [C] ;salvamos resta 

mov si,offset ResResta 


mov di,offset ResResta 



; hace la multiplicación… 


fmul [B] ;multiplica por valor en RAM 


mov di,offset CadMulti ;exhibe letrero de resultado 

call SacaCadena ;de producto 

fst [C] ;salvamos producto 

mov si,offset ResMulti 


mov di,offset ResMulti 



; hace la división… 


fdiv [B] ;divide por el valor en RAM 


mov di,offset CadCociente ;exhibe letrero de resultado 

call SacaCadena ;de división 

fstsw [ST80387] ;salvamos banderas 

test [ST80387],MASKZ 

jnz @@30 

mov si,offset ResCociente 


mov di,offset ResCociente 



@@20: 

fclex ;limpia excepciones 

mov ax,4c00h 

int 21h ;fin del programa 

@@30: 

mov di,offset PROB ;saca mensaje 

call SacaCadena ;del problema (división por cero) 

jmp SHORT@@20 

end Entra ;fin del programa A387.ASM 



13-13


3.3 Ejecutar el programa: C>A387 (Se muestran cuatro corridas) 

C:\SEM386>a387 

Este programa encuentra la suma, la resta, el producto y el cociente de dos 

números de punto flotante. Usa el coprocesador 80387 

formato: [+//-][.][E/e][+/-] 

Teclear primer número real…..: -54.429 

Teclear segundo número real..: 86.542 

La suma es…….: +0.321129991455078126E+002 

La resta es……..: -0.140971000671386719E+003 

El producto es…: -0.471039458198321518E+004 

El cociente es….: -0.628931628222747430E+000 

C:\SEM386> 

C:\SEM386>a387 



formato: [+//-][.][E/e][+/-] 

Teclear primer número real…..: 113.097 

Teclear segundo número real..: -34.29 

La suma es…….: +0.788070001220703125E+002 

La resta es……..: +0.147387001037597656E+003 


El cociente es….: -0.329825013422082613E+001 

C:\SEM386> 

C:\SEM386>a387 



formato: [+//-][.][E/e][+/-] 

Teclear primer número real…..: 9.87e11 

Teclear segundo número real..: 14.19567e-6 

La suma es…….: +0.987499986944000014E+012 

La resta es……..: +0.987499986943999986E+012 

El producto es…: +0.140182237339267731E+008 

El cociente es….: +0.695634655804740981E+017 

C:\SEM386> 





3.4 Este programa se puede se puede depurar con Turbo Debugger mediante el 

siguiente comando: 

C>TD A387.EXE 

Ejecutar paso a paso las rutinas ftoa y atof y estudiar cómo trabaja. 

3.5 Poner los registros en 32 bits y visualizar las variables A y B, que son 

reales. 

3.6 ¿Cuál es la representación interna de -10.0 y de 25.0? 

4 TAREAS 

C:\SEM386>a387 



formato: [+//-][.][E/e][+/-] 

Teclear primer número real…..: -87.654 

Teclear segundo número real..: 0.0 

La suma es…….: -0.8765399932861132813E+002 

La resta es……..: -0.8765399932861132813E+002 


El cociente es….: División por cero 

C:\SEM386> 

4.1 Introducir al programa el procedimiento Confirma y llamarlo para verificar 

la opción de realizar otro cálculo 

4.2 Verificar los límites de operación del coprocesador numérico corriendo 

A387 dando valores críticos. 

4.3 Agregar al programa la capacidad de recibir los dos números en la línea de 

comandos. 

4.4 En el módulo A387.ASM añadir una rutina para exhibir resultados con tres 

decimales de precisión, justificando a la derecha el resultado y si el mismo 

no cabe en diez lugares, escribir puros asteriscos. 

4.5 Hacer que el programa A387 corra si el coprocesador no existe.

PRÁCTICA 13

Create successful ePaper yourself

Delete template?

Save as template?