一个小问题，在线等待，散分

[tenderknight]

问题：以知5个数，求最大和最小值？

呵呵，问题简单抓紧时间哦~~~

[atm2001]

冒泡排序...
汇编版的算法程序网上有，搂主查查...

[snowegale888]

up

[dunkel]

找最大和最小值, 不需要进行排序的吧, 一次扫描就够了, 排序, 往往需要不止一次的.

[broown]

汇编冒泡程序
datarea segment
a db 1,1,1,1,1,1
b db 'input 6 nmble ' ;massage

datarea ends
pregnam segment
main proc far
assume cs:pregnam,ds:datarea
start: push ds
sub ax,ax
push ax
mov ax,datarea
mov ds,ax
mov di,0
mov cx,15
outt: mov dl,b[di] ;out put massage
mov ah,2
int 21h
inc di
loop outt
mov cx,6 ;for i:=0 to 6
mov bx,0
input: mov ah,1 ;input 6 numble
int 21h
mov a[bx],al
inc bx
loop input
mov cx,6
dec cx
loop1: mov di,cx ;mopao pai su
mov bx,0 ;for i:=0 to 5 do
; for j;=1 to 5-i do
loop2: mov al,a[bx] ;begin
cmp al,a[bx+1]
jge cotinve
xchg al,a[bx+1]
mov a[bx],al
cotinve: add bx,1
loop loop2
mov cx,di
loop loop1 ;end
mov cx,6h
mov dl,10 ;writln
mov ah,2
int 21h
mov dl,13
int 21h
mov bx,0 ;print a[1..6]
loop3: mov dl,a[bx]
mov ah,2
int 21h
add bx,1
loop loop3
ret ;ret dos
main endp
pregnam ends
end start