求1~N的累加和累乘

[adm1m]

把1~N的累加和累乘做在一个程序里面

输出的字符有颜色,语句都有解释,有容错能力.

求1到N的累加和累乘 N要求用键盘输入,有提示信息.有相关的汇编也可以.谢谢

按1是选择累加 按2是选择累乘

以下一段程序是累加，希望能够把2个加累乘做在一起，谢谢。

引用

data segment
msg db 'input N:$'
data ends

code segment
assume cs:code,ds:data
main proc near
start:
mov ax,data
mov ds,ax

mov dx,offset msg
mov ah,09h
int 21h

call decibin;接收N的子程序

mov cx,bx
mov bx,0
loop1:
add bx,cx;1+2+…N的和存入BX
loop loop1

call crlf
call bini;显示BX中的内容

mov ah,4ch
int 21h
ret
main endp
;------------------------------
decibin proc near;接收N子程序
mov bx,0
newchar:
mov ah,1
int 21h
sub al,30h
jl exit
cmp al,9d
jg exit
cbw
xchg ax,bx
mov cx,10d
mul cx
xchg ax,bx
add bx,ax
jmp newchar
exit:
ret
decibin endp
;------------------------------------
bini proc near;转化为十进制输出子程序
mov cx,10000d
call bin
mov cx,1000d
call bin
mov cx,100d
call bin
mov cx,10d
call bin
mov cx,1d
call bin
ret
bini endp

bin proc near
mov ax,bx
mov dx,0
div cx
mov bx,dx
mov dl,al
add dl,30h
mov ah,02h
int 21h
ret
bin endp
;--------------------------------
crlf proc near;回车换行子程序
mov dl,0dh
mov ah,02h
int 21h
mov dl,0ah
mov ah,02h
int 21h
ret
crlf endp

code ends
end start