1个回答
展开全部
调试通过!
DATAS SEGMENT
s db 6 dup(0),'$'
i db 'input :$'
o db 'output:$'
se db 0dh,0ah,'$'
DATAS ENDS
STACKS SEGMENT
;此处输入堆栈段代码
STACKS ENDS
CODES SEGMENT
ASSUME CS:CODES,DS:DATAS,SS:STACKS
START:
MOV AX,DATAS
MOV DS,AX
lea dx,i ;提示输入
mov ah,9
int 21h
;输入
lea si,s ;输入字符存放的地址
mov cx,6 ;输入次数
ss1:
mov ah,7 ;输入字符无回显
int 21h
cmp al,30h ;判断字符是否是0 - 9
jb ss1 ;如不是不显示重新输入
cmp al,39h
ja ss1
mov [si],al ;如果是保存
inc si
mov dl,al ;并且显示输入的字符
mov ah,2
int 21h
loop ss1
;冒泡法排序
lea si,s
mov cx,5
ss2:
mov dx,cx
mov bx,0
mov al,[si]
ss3:
cmp dx,0
jz ss5
inc bx
cmp al,[si+bx]
jbe ss4 ;排序开关 从小到大
;jae ss4 ;从大到小
xchg al,[si+bx]
mov [si],al
ss4:dec dx
jmp ss3
ss5:
inc si
loop ss2
lea dx,se ;回车换行
mov ah,9
int 21h
lea dx,o ;提示输出
mov ah,9
int 21h
lea dx,s ;输出字符串
mov ah,9
int 21h
mov ah,0 ;等待输入
int 16h
MOV AH,4CH
INT 21H
CODES ENDS
END START
DATAS SEGMENT
s db 6 dup(0),'$'
i db 'input :$'
o db 'output:$'
se db 0dh,0ah,'$'
DATAS ENDS
STACKS SEGMENT
;此处输入堆栈段代码
STACKS ENDS
CODES SEGMENT
ASSUME CS:CODES,DS:DATAS,SS:STACKS
START:
MOV AX,DATAS
MOV DS,AX
lea dx,i ;提示输入
mov ah,9
int 21h
;输入
lea si,s ;输入字符存放的地址
mov cx,6 ;输入次数
ss1:
mov ah,7 ;输入字符无回显
int 21h
cmp al,30h ;判断字符是否是0 - 9
jb ss1 ;如不是不显示重新输入
cmp al,39h
ja ss1
mov [si],al ;如果是保存
inc si
mov dl,al ;并且显示输入的字符
mov ah,2
int 21h
loop ss1
;冒泡法排序
lea si,s
mov cx,5
ss2:
mov dx,cx
mov bx,0
mov al,[si]
ss3:
cmp dx,0
jz ss5
inc bx
cmp al,[si+bx]
jbe ss4 ;排序开关 从小到大
;jae ss4 ;从大到小
xchg al,[si+bx]
mov [si],al
ss4:dec dx
jmp ss3
ss5:
inc si
loop ss2
lea dx,se ;回车换行
mov ah,9
int 21h
lea dx,o ;提示输出
mov ah,9
int 21h
lea dx,s ;输出字符串
mov ah,9
int 21h
mov ah,0 ;等待输入
int 16h
MOV AH,4CH
INT 21H
CODES ENDS
END START
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询