Найти и вывести индекс первого четного элемента массива, кратный числу 6.
Зарание спасибо..
Добавлено через 2 мин.
Компилятор masm32 и сам массив:
Нажмите для просмотра прикрепленного файла
.486Говорю сразу: программа проверена, отработала, никаких ошибок или предупреждений не выдает, выводит правильный ответ. Это на случай, если тебе тоже захочется что-нибудь поменять, а потом заявить, что не сработало...
.model flat, stdcall
option casemap :none
include D:\masm32\include\windows.inc
include D:\masm32\macros\macros.asm
include D:\masm32\include\masm32.inc
include D:\masm32\include\kernel32.inc
includelib D:\masm32\lib\masm32.lib
includelib D:\masm32\lib\kernel32.lib
; Подключаем твой файл данных
include array_20.dat
DIVISOR db 6
.code
start:
call main
exit
main proc
mov esi, offset file1
mov edi, esi
mov ecx, fsize1
.while ecx > 0
xor ax, ax
mov al, [esi]
div DIVISOR ; делим на 6
test ah, 0fh ; проверяем остаток на 0
jz found ; ноль? Значит, нашли то, что надо
inc esi
dec ecx
.endw
; а вот если мы здесь, значит, нет такого элемента,
; который делится на 6 нацело. Выведи соотв. сообщение
; самостоятельно, и выходи из процедуры
found:
print chr$('first index = ')
xor eax, eax ; вычисляем индекс, для чего от текущего
mov eax, esi ; значения esi отнимаем смещение начала массива
sub eax, edi
print str$ (eax)
ret
main EndP
end start