data segment
mass db 1,14,4,9,5,21,3,17,12,100
data ends
code segment
assume cs: code, ds: data
		start: 	mov ax, data
		mov ds, ax 		; Загрузить сегментный адрес данных
                        xor dx, dx; обнулим сумму
		  		lea bx, mass 	; Загрузить адрес смещения массива
		 		mov cx, 10 	; Установить счетчик повторений цикла
		 		mov al, 6;      Первый элемент массива в Аккумулятор
		  	beg: 	cmp [bx],al	; Сравнить текущий элемент 
		; массива с максимальным
		 		jg no 	; он больше
		add dx, byte [bx]		; сумма

	no:  
	             inc bx		; Следующий элемент
				 ; массива
			loop beg                                
 	quit:	mov ax,4C00h 		; Код завершения 0
int 21h 			; Выход в DOS
	code ends
	end start