DATAS SEGMENT
DATA1 DB 1,2,3,4,5
DATAS ENDS
CODES SEGMENT
ASSUME CS:CODES,DS:DATAS
START: MOV AX,DATAS
MOV DS ,AX
MOV CX ,4
MOV SI ,0
CLC
MOV AL,DATA1[SI]
LOOPER:MOV BL,DATA1[SI+1]
MUL BL
INC SI
DEC CX
JNZ LOOPER
MOV DL,AL
MOV AH,2H
INT 21H
MOV AH,4CH
INT 21H
CODES ENDS
END START