Задача на Массив, Помогите решить задачу на массив Опции

[BAEVIK]

Помогите пожалуйста решить задачу: Вывести индекс массива, с которго начинается самая длинная цепочка четных элементов.

[volvo]

Ну, раз MASM, то основная процедура может выглядеть вот так, например:

; Вот так описан массив и переменные:
.data
A	dword 1, 2, 32, 4, 5, 61, 72, 8, 92, 14
sz	dword 10
b	dword 0
i	dword 11

; а так - основная процедура:
main proc
	mov edx, 0	; evens
	mov ebx, 0	; max
	
	mov esi, offset A
	mov ecx, sz
	.while ecx > 0
		mov eax, [esi]
		test eax, 1
		jnz not_even
		
		inc edx
		jmp check_max
	not_even:
		mov b, 1
		
	check_max:
		cmp b, 1
		je inside
		cmp ecx, 1
		jne go_next
		
	inside:
		
		cmp edx, ebx
		jle not_change
		
		mov i, ecx
		mov ebx, edx
		
	not_change:
		mov edx, 0
		mov b, 0
		
	go_next:
		add esi, sizeof(dword)
		dec ecx
		
	.endw

	print chr$('index = ')
	mov eax, sz
	inc eax

	sub eax, i
	sub eax, ebx
	print str$ (eax)
	ret
main EndP

Под MASM 6.14 отработало.