;сохранить 1, если число содержит данную цифру
;иначе сохранить 0

masm
model small
stack 256
.data
a dw 4242   ;  исходное число
b db 10  ;  делитель
search db 4  ;  число, которые надо найти
rezult db ?  ;  результат
.code
main:
	mov ax,@data
	mov ds,ax
	xor ax,ax

	cycle:
	cmp a, 0
	jz end_cycle
	mov ax, a

	;при делении "слова" частное заносится в регистр AL
	;а остаток от деления в регистр AH

	div b

	cmp ah, search  ;  сравнимаем остаток от деления и нужную цифру
	jnz else1 ;  переход, если не равны
	jz end_if

	else1:  ; если равны, то
	mov rezult, 0
	xor ah, ah
	mov a, ax

	end_if:
	mov rezult, 1 ; заносим в результат единицу
	mov a, 0 ; переменную а обнуляем


	end_cycle:

	mov ax,4c00h
	int 21h
end main