Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 09.11.2011, 17:53   #1
S1av0k
Пользователь
 
Регистрация: 26.11.2009
Сообщений: 87
По умолчанию TASM симметричность матрицы

Необходимо проверить матрицу на симметричность относительно главной диагонали. Идея такова. Хранить адрес элемента главной диагонали, считая его за base, пробежаться относительно base по всем элементам строки и столбца, соответствующего этому base, после чего сместить base на следующий элемент главной диагонали и повторить. Проблема в том, что по непонятной для меня причине, я не могу таким образом добраться даже до второго элемента строки. Прошу разъяснить мне, почему так происходит и как это исправить.
Код:
.model small
.stack 100h
.data
mas	db 1,2,3,4
	db 2,5,6,7
	db 3,6,8,9
	db 4,7,9,0
		
n equ 4
tmp dw 0
i dw 1
base db 0
rez db 1 ;результат проверки на симметричность. 0 - несимметрична, 1 - симметрична
.code
.386		
ENTRYPOINT:
	mov ax,@data
	mov ds,ax
	
	mov bx,0
	mov si,0
	mov al,offset mas
	mov base,al
	
	xor ax,ax
	xor bx,bx
	mov si,1
	mov cx,n-1
m1:	
	mov bx,0
	mov si,tmp
	inc si
	inc si
	mov al,byte ptr base[si][bx]
	mov tmp,si
; -------------------------------	si = (n-1)*si
	mov ax,n-1
	mul si
	mov si,ax
; -----------------------------------------------
	mov bx,i
	cmp al,byte ptr base[si][bx]
	jne exit_0
	jns m3
	inc i
loop m1

m3:
	add base,n
	
exit_0:
	mov rez,0
	
exit_1:	
	mov ah, 4ch
	int	21h
end ENTRYPOINT
Помог - жми весы
S1av0k вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
TASM дело тонкое!:) (Где в TASM IDE?) 3.14oner Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM 9 15.11.2011 16:20
Симметричность Mr.KOHCEPBATOP Паскаль, Turbo Pascal, PascalABC.NET 3 18.10.2011 19:46
TASM Hant111 Фриланс 5 23.03.2010 21:54
TASM romale Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM 0 16.12.2009 23:03
Проверка строки матрицы на симметричность. EVIL Помощь студентам 2 26.11.2007 23:23