:-/Что-то не так

[Iriska]

Уважаемые программисты, скажите пожалуйста что исправить, чтобы программа правильно работала
Определить  симметричный  ли массив, то есть ровни ли между собой равноудаленные от концов элементы массива и подать ответ «1», если так, или «0» если нет
А программа выводит просто числа

INCLUDE LIBMACRO.INC
PROGRAM PR_10_1

.DATA 
  ДА    db 1
  НЕТ   db 0
  n     equ 25
  mas  db 1,2,3,4,5,3,7,8,9,10,11,12,13,12,11,10,9,8,7,6,5,4,3,2,1
 
start;   
   assume    ds:@data, es:@data
   mov   ax,@data
   
   mov cx,12
   mov si,n
   mov di,0
   dec si

m1:
   mov al,mas[si]
   wword mas[si]
   wword mas[di]
   cmp al,mas [di]
   jne m2
   inc di
   dec si
loop m1
            wword ДА
jmp ex
m2:
             wword НЕТ
ex:
return   
END PR_10_1

[Finch]

Название переменных пиши латиницой. Очень мало компиляторов воспринимают другие шрифты. Не думаю, что ассемблерный компилятор воспринимает кирилицу нормально. Давно не писал на асме. Что это за макрос wword?

[Iriska]

Я писала  в идеале английскими, там вместо да и нет yes и no . А wword выводит числа на экран из регистров

[Finch]

Ну тогда у тебя тут

Код:

  mov al,mas[si]
   wword mas[si]
   wword mas[di]
   cmp al,mas [di]

И должен выводить.

[Iriska]

Выводит числа , а не 0 или 1, как в условии требуется....

[Sla]

Iriska, ну... а кто будет преобразовывать числа в символы?

[Iriska]

Уже все хорошо)

[zhan313]

попробуй

mov   ax,@data

  mov   ds,ax
  mov   es,ax

mov cx,12