Обменять местами содержимое двух символьных массивов - Assembler - Ответ 14041967

.MODEL SMALL
.STACK 256
.DATA
Mas1 DB 'Mas1', '  ','qwertyuiopasdfghjklzxcvbnmqwer', 13, 10, '$' 
MasLen equ $-Mas1-1 ;длина массива
Mas2 DB 'Mas2', '  ','mnbvcxzlkjhgfdsapoiuytrewqmnbv', 13, 10, '$' 
.CODE
Start:
MOV AX, @DATA
MOV DS, AX
;---------------------вывод исходных массивов----------------------------
LEA DX, Mas1 ;вывести переменную
MOV AH, 09h ;Mas1
INT 21h ;на экран
 
LEA DX, Mas2 ;вывести переменную
MOV AH, 09h ;Mas2
INT 21h ;на экран
;---------------------обработка массивов----------------------------------
mov cx, MasLen ; MasLen - длина каждого из массивов Mas1 и Mas2
for:
mov al, [si] ; temp1=Mas1[i]
mov ah, [di] ; temp2=Mas2[i]
 
mov [si], ah ; Mas1[i]=temp2
mov [di], al ; Mas2[i]=temp1
 
add si, 1 ; можно inc si
add di, 1 ; можно inc di
loop for
;---------------------вывод обработанных массивов------------------------
LEA DX, Mas1 ;вывести переменную
MOV AH, 09h ;Mas1
INT 21h ;на экран
 
LEA DX, Mas2 ;вывести переменную
MOV AH, 09h ;Mas2
INT 21h ;на экран
;----------------Завершение программы------------------------------------
MOV AX, 4C00h ;завершить
INT 21h ;программу
  END Start