Найти сумму элементов столбца матрицы, содержащего максимальный по модулю элемент - Assembler - Ответ 8813875

    Row SBYTE 4  ; строки
    Col SBYTE 3  ; колони
    i   SBYTE 0  ; счётчик
    j   SBYTE 0  ; счётчик
    k   SBYTE 0  ; строка максимума
    l   SBYTE Row  ; сохранённая строка
    Kbd db ?  ; буфер клавы
    MKb db ?  ; модуль
    Max db 0  ; максимум по модулю
    Sum dw ?  ; сумма
    Res dw ?  ; конечный результат
    Arr db Row dup (Col dup (?))  ; массив исходных данных
 
    ; получеие числа главных циклов
    mov CX, Row
c_j0:   push CX
 
    ; получения числа вложенных циклов
    mov CX, Col
 
    ; обнуление суммы
    mov AX,Sum
    xor AX,AX
    mov Sum,AX
 
    ; ввод с клавы
c_i0:   ___
 
    ; копируем Kbd в MKb
    mov AX,Kbd
    mov MKb,AX
    
    ; вычисление модуля MKb
    mov AX,MKb
    xor BX,BX
    cmp AX,BX
    jg ACM0 ; отмена вычисления модуля
    not AX
    inc AX
 
ACM0:   ; проверка вхождения в диапазон, если ложь goto c_i0
    mov AX,MKb
    mov BX,99
    cmp AX,BX
    jg c_i0
 
    ; переписываем Kbd в Arr
    mov AX,j
    mov BX,Row
    imul AX,BX
    mov BX,i
    add AX,BX
    mov BX,Kbd
    mov Arr[AX],BX
 
    ; увеличиваем Sum на Kbd
    mov AX,Sum
    mov BX,Kbd
    add AX,BX
    mov Sum,AX
 
    ; сравниваем MKb и Max, если MKb больше - заменяем Max на MKb
    mov AX,MKb
    mov BX,Max
    cmp AX,BX
    jg Rec0
 
    ; сравниваем Kbd и Max, если равны - заменяем Max на Kbd
    mov AX,Kbd
    cmp AX,BX
    jnz End0
 
    ; сохраняем новый максимум и колонку
Rec0:   mov AX,MKb
    mov Max,AX
    mov AX,j
    mov k,AX
 
    ; конец вложенного цикла
End0:   loop c_i0
 
    ; проверяем необходимось сохранения текущего результата
    mov AX,k
    mov BX,l
    cmp AX,BX
    jz Rec1
 
    ; сохраняем текущий результат
    mov AX,Sum
    mov Res,AX
    mov AX,k
    mov l,AX
 
    ; конец главного цикла
Rec1:   pop CX
    loop c_j0
 
    ___  ; вывод Col, Max, Res
 
    mov AX, 4C00h
    int 21h