.model small
.stack 100h
.data
m1 db "nhap vao chu in hoa $"
m2 db "chu in thuong la : $"
a db ?
.code
main proc
mov ax,@data
mov ds,ax
lea dx,m1
mov ah,9
int 21h

mov ah,1
int 21h
add al,32
mov a,al

mov dl,10
mov ah,2
int 21h

mov ax,@data
mov ds,ax
lea dx,m2
mov ah,9
int 21h

mov dl,a
mov ah,2
int 21h

mov ah,1
int 21h
mov ah,4ch
int 21h
main endp
end main