DATAS SEGMENT
sum db 5 dup(0)
jiashu db 0
chushu dw 10
DATAS ENDS
STACKS SEGMENT
db 20 dup(0)
STACKS ENDS
CODES SEGMENT
ASSUME CS:CODES,DS:DATAS,SS:STACKS
START:
MOV AX,DATAS
MOV DS,AX
mov ax,0
mov cx,49
AGAIN:inc jiashu
mov bl,jiashu
and bl,01h
jnz AGAIN
add al,jiashu
adc ah,0
loop AGAIN
mov cx,4
mov si,3
aga:cwd
div chushu
add dl,30h
mov sum[si],dl
dec si
loop aga
mov sum[4],'$'
mov dx,offset sum
mov ah,9
int 21h
MOV AH,4CH
INT 21H
CODES ENDS
END START