Programas vistos en clase

Programa que saca el promedio de 3 materias
Código:

name "calcula el promedio de tres materias"
include "emu8086.inc"
org 100h 

.data
pro db 4 dup (?)  

.code
promedio proc
    printn ""  
    print "introduce una calificacion: "
    call scan_num  
    mov pro[0],cl
    printn ""
    print "introduce la 2da calificacion: "
    call scan_num
    mov pro[1],cl
    printn ""
    print "introduce la 3ra calificacion: "
    call scan_num
    mov pro[2],cl
    printn ""
    print "numero de materias: "
    call scan_num
    mov pro[3],cl
    xor ax,ax
    add al,pro[0]
    add al,pro[1]
    add al,pro[2]
    div pro[3]
    printn ""
    print "promedio es= "
    call print_num
      
promedio endp

exit:
    printn ""
    printn ""
    print "presione para salir..."
    mov ah,0
    int 16h
    ret
define_print_string
define_print_num
define_print_num_uns
define_scan_num

end

programa que resta dos números

Código:

include 'emu8086.inc'

org 100h

.data

resta db 2 dup (?)

.code

restas proc

print " "

print "Introduce el primer numero: "

call scan_num

mov resta[0],cl

print " "

print "Introduce el segundo numero: "

call scan_num

sub resta[1],cl

print " "

xor ax,ax

add al,resta[0]

add al, resta[1]

print " "

print "La resta es: "

call print_num

restas endp

exit:

print " "

print " "

print "Presiona enter para salir..."

mov ah,0

int 16h

ret

define_print_string

define_print_num

define_print_num_uns

define_scan_num

end

ret