汇编循环程序求累加和

1、两个汇编程序（求累加和） ：第一题：从键盘输入一个十进制数n,计算1+2+3+4+,+n=sum，并以此格式输出。(结果超过 65535 时会溢出)代码：DATA SEGMENTINF1 DB "Please Input a Number (065535):$"IBUF DB 7,0,6 DUP(?)OBUF DB 6 DUP(?)STRING DB "1+2+$"ZHONGZHI DB 6 DUP(?)GES DW ?SUM DW ?MD DW 0DATA ENDSCODE SEGMENTASSUME CS:CODE,DS:DA TASTART:MOV

2、 AX,DATAMOV DS,AXMOV DX,OFFSET INF1MOV AH,09HINT 21HMOV DX,OFFSET IBUFMOV AH,0AHINT 21HMOV CL,IBUF+1MOV CH,0MOV SI,OFFSET IBUF+2MOV AX,0AGAIN:MOV DX,10MUL DXAND BYTE PTR SI,0FHADD AL,SIADC AH,0INC SILOOP AGAINMOV GES,AX; 输出提示语句;从键盘输入一个十进制数 n （字符串）命令; 将输入的串转换为数值存于 AX 中; 保存输入的 n;计算过程： 1+2+3+, .+nMOV C

3、X,AXMOV AX,0MOV MD,1 LOOP1:ADD AX,MDINC MDLOOP LOOP1MOV SUM,AX;换行输出; 输出“ 1+2+SHUCHU:MOV DL,0AHMOV AH,2 INT 21HMOV DL,0DHMOV AH,2INT 21HMOV DX,OFFSET STRINGMOV AH,09HINT 21HMOV AX,GESMOV BX,OFFSET ZHONGZHI+5MOV BYTE PTRBX,'$'MOV CX,10 LOOP2:MOV DX,0 DIV CX ADD DL,30H DEC BX MOV BX,DL OR AX,AX

4、 JNZ LOOP2 MOV DX,BX MOV AH,09H INT 21H;输出 “ =MOV DL,'='MOV AH,2INT 21HMOV AX,SUMMOV BX,OFFSET OBUF+5MOV BYTE PTRBX,'$'MOV CX,10 LOOP3:MOV DX,0DIV CXADD DL,30HDEC BXMOV BX,DLOR AX,AXJNZ LOOP3MOV DX,BXMOV AH,09HINT 21HFINISH:MOV AH,4CH;结束INT 21HCODE ENDSEND START结果截屏：T!I 1 n n ? a i1!

5、 r 0丄 ？1.00Please Input a Number (065535):1001+2+100=5050Press any key t0 c0ntinue . . .+n=sum第二题：从 1 +2+3+ , 一直累加， 当结果大于 6000时结束，并输出结果：1+2+3+,代码：DATA SEGMENTINF1 DB 0AH,0DH,"Please Input a Number (065535):$"STRING DB 0AH,0DH,"1+2+$"IBUF DB 7,0,6 DUP(?) GESHU DB 6 DUP(?)JIEGUO DB

6、 6 DUP(?)SUM DW ?MD DW 0DATA ENDSCODE SEGMENTASSUME CS:CODE,DS:DA TASTART:MOV AX,DATAMOV DS,AXMOV DX,OFFSET STRINGMOV AH,09HINT 21HMOV AX,0MOV MD,1LOOP1:ADD AX,MDINC MDCMP AX,60000JBE LOOP1MOV SUM,AXMOV AX,MDMOV BX,OFFSET GESHU+5 MOV BYTE PTRBX,'$' MOV CX,10LOOP2:MOV DX,0DIV CXADD DL,30HDEC

7、BXMOV BX,DLOR AX,AXJNZ LOOP2MOV DX,BXMOV AH,09HINT 21HMOV DL,'='MOV AH,2INT 21H;换行输出;计算过程 1+2+3+ 直到结果大于;输出个数（加到多少为止）;输出“ =60000MOV AX,SUMMOV BX,OFFSET JIEGUO+5MOV BYTE PTRBX,'$'MOV CX,10LOOP3:MOV DX,0DIV CXADD DL,30HDEC BXMOV BX,DLOR AX,AX;输出总和JNZ LOOP3MOV DX,BXMOV AH,09H INT 21HFINISH:MOV AH