сортировка выбором

Ответ от Миоко Таканава[гуру]
>Сам пробовал, не получается. Не верю. Пустой цикл попыткой не считается. data segment mas db 2, 4, 1, 0, 6, 9, 8, 7, 1 len dw $-mas data ends code segment assume cs:code,ds:data begin: mov ax,data mov ds,ax ;Сортировка по неубыванию массива 8-разрядных беззнаковых чисел ;методом прямого выбора (на мой взгляд самый простой и наглядный ;метод сортировки) mov cx,len dec cx xor di,di ciki: push cx mov si,len dec si mov bx,di mov al,mas[di] DoLoop: cmp mas[si],al jae NotBelow mov al,mas[si] mov bx,si NotBelow: dec si loop DoLoop mov cl,mas[di] mov mas[bx],cl mov mas[di],al inc di pop cx loop ciki ;Массив отсортирован mov ax,4c00h int 21h code ends end begin