DATAS SEGMENT
  x db 2,3,8,7,6,5,9,4,1
DATAS ENDS

CODES SEGMENT
    ASSUME CS:CODES,DS:DATAS
START:
    MOV AX,DATAS
    MOV DS,AX
     lea si,x
     mov di,si
     inc di
     mov bx,8
     next1:
    
     push di
     mov cx,bx
     
     mov al,[si]
 next2:  cmp al,[di]
    jle ok
    xchg al,[di]
    mov [si],al
  ok:    inc di  
  
    loop next2
    
    
    pop di
   
    inc si
    inc di
    dec bx
    jnz next1
    
     lea si,x
     mov cx,9
    next3: mov al,[si]
     add  al,30h
     mov dl,al
     mov ah,2
     int 21h
     inc si
     loop next3
    MOV AH,4CH
    INT 21H
CODES ENDS
    END START