Всякие лабы / LabRab_3

Цель работы.

Изучить способы адресации данных процессоров семейства 80х86. Реализовать программу, сохраняющую два массива чисел, введенных с клавиатуры. В результате программа должна вывести на экран массив, в котором каждому элементу присвоено значение большего из одноименных элементов двух введенных массивов.

Экспериментальные результаты.

После запуска программа просит ввести число — количество элементов в массиве (рис. 1).

Рис. 1 Далее программа просит последовательно ввести содержимое первого и

второго массива (рис. 2).

Рис. 2

Врезультате программа выводит на экран массив, в котором каждый элемент

—наибольший из одноименных элементов двух введенных массивов (рис. 3).

Рис. 3

Вывод.

В ходе выполнения лабораторной работы была реализована программа, которая просит ввести с клавиатуры два массива чисел. В результате программа выводит на экран массив, в котором каждый элемент — больший из одноименных элементов двух введенных массивов.

Приложение 1. Исходный код.

TITLE LAB3

.Model Small

.STACK 100h

.Data

message0 db 'Enter number of elements: ','$'

message1 db 'Enter mas1: ','$' message2 db 'Enter mas2: ','$' message3 db 'Result: ','$' message4 db ' ','$'

mas1 dw 20 dup(?)

error db 'ERROR', '$'

.Code input proc push cx push si mov ah,0Ah xor di,di

lea dx, [buff] mov [buff], 6 int 21h

mov dl,0Ah mov ah,02 int 21h xor ax,ax mov bx,10

lea si,[buff+2]

metka_2:

mov cl, [si]

cmp cl, 0Dh jz endin cmp cl, '-' jz mt

cmp cl,'0' jb er

cmp cl, '9' ja er

sub cl,'0'

mul bx add ax,cx inc si

jmp metka_2

mt:

mov di,1 inc si

jmp metka_2

er:

lea dx, error mov ah, 09 int 21h

int 20h

endin: cmp di, 1 jz ng

pop si pop cx

ret

ng: neg ax pop si pop cx ret

input endp

output proc push cx push si xor cx,cx mov bx,10

metka_1: xor dx,dx div bx push dx

inc cx test ax,ax

jnz metka_1

mov ah, 02h

loop1: pop dx

add dl,'0' int 21h loop loop1 pop si

pop cx ret

output endp

begin:

mov ax, @data mov ds, ax

lea dx, message0 mov ah, 09

int 21h

call input mov [num], ax mov cx,[num] mov si, 00

lea dx, message1 mov ah, 09

int 21h

enter1: call input

mov [mas1+si], ax add si,2

loop enter1

mov cx,[num] mov si, 00

lea dx, message2

mov ah, 09 int 21h

enter2: call input

mov [mas2+si], ax add si,2

loop enter2

mov cx,[num] mov si, 00

change:

mov ax,[mas2+si] mov bx,[mas1+si] cmp ax,bx

ja ver1 jb cont

ver1:

mov [mas1+si], ax

cont: add si,2

loop change

mov cx,[num] mov si, 00

lea dx, message3 mov ah, 09

int 21h

outt:

mov ax,[mas1+si] ;mov ah, 00

call output add si,2

lea dx, message4 mov ah, 09

int 21h loop outt

mov ax, 4c00h int 21h

end begin