data segment
tab db 5,2,0,9,11,6,7
	db 5,12,7,0,8,0,9
	db 5,0,14,6,15,9,31
	db 13,5,18,45,3,9,45
tabl db 9 dup(0)
data ends

code segment
assume cs:code,ds:data
start:
mov ax, data
mov ds,ax
mov si, offset tab
mov di, offset tabl
mov bl,0
mov cx,28
beg: mov al,[si]
cmp al,10


jb a
mov tab[si],9
mov tabl[di],al
inc di
inc bl
a:inc si	     
loop beg

mov ah,2
mov al,bl
mov dl,al
or dl,30h
int 21h
mov ah,1
int 21h
mov ah,4ch
int 21h
code ends
end start