Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Форум «Всё о Паскале» _ Ассемблер _ Массив

Автор: Pod_Bot 30.05.2008 4:08

Помогите ввести массив с клавиатуру???? Буду очень благодарин!!!
( Прога поизводит пузырьковую сортировку ошибка в выводе)

model small
stack 100h
.data
elm dw ?
elm1 db 0
elm2 db 0
deset db 10
mas db 51,72,95,21,36
n=$-mas
x db 0
.code
start:
mov ax,@data
mov ds,ax

; sortirovka

mov cx,n-1
mov si,1
cikl1:
push cx
mov cx,n
sub cx,si
push si
mov si,n-1
cikl2:
mov al,mas[si-1]
cmp mas[si],al
ja m1
mov x,al
mov al,mas[si]
mov mas[si-1],al
mov al,x
mov mas[si],al
m1:
dec si
loop cikl2
pop si
inc si
pop cx
loop cikl1

;vivod

mov cx,5
mov si,0
cikl3:
sub ah,ah
sub al,al
mov ax,mas[si]
div deset
mov elm1,al
mov elm2,ah

;vivod pervoi 4asti elementa

mov dl,elm1
mov ah,02h
add dl,30h
int 21h

;vivod vtoroi 4asti elementa

mov dl,elm2
mov ah,02h
add dl,30h
int 21h
inc si
loop cikl3

;konec

mov ax,4c00h
int 21h
end start

Автор: Pod_Bot 10.06.2008 0:06

Помогите плиззз!!!!! unsure.gif

Автор: мисс_граффити 10.06.2008 4:09

так тебе ввод или вывод нужен???