汇编语言：多位数输入输出&循环设计实验

;多位数的输入输出
DATAS SEGMENT
    ;此处输入数据段代码 
    x dw ?
    n dw 10 
DATAS ENDS
STACKS SEGMENT
    ;此处输入堆栈段代码
    db 100 dup(?)
STACKS ENDS
CODES SEGMENT
    ASSUME CS:CODES,DS:DATAS,SS:STACKS
START:
    MOV AX,DATAS
    MOV DS,AX
    
	;先把输入的字符串变为十进制数值
    mov bx,0 ;存储到bx
L1:
	mov ah,1
	int 21h	;AL=输入数字的ascii码
	cmp al,0dh ;0dh是回车
	jz L2 	;输入结束
	sub al,30h	
	mov ah,0
	xchg bx,ax
	mul n
	add bx,ax;
	jmp L1
L2:
	MOV dl,0dh ;DL为回车
	MOV AH,2
	INT 21H		;dl=输出字符
	mov x,bx	;把输入的结果存到x
	
	mov ax,x
	mov bx,10
	mov cx,0
	mov dx,0
L3: 
	div bx	;ax/bx，bx为除数,dx=余数 ax=商
	push dx
	inc cx	;记录位数
	cwd ;字转化为双字，al->ax
	cmp ax,0 ;被除数不为0继续
	jnz L3
L4:
	pop dx
	add dl,'0'
	
	MOV AH,2
	INT 21H
	loop L4
	
    MOV AH,4CH
    INT 21H
CODES ENDS
    END START

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59

2、 从自然数1开始累加，直到累加和大于60000为止，显示累加的自然数的个数和累加和。显示格式为：1+2+…+n=sum
其中n为累加个数，sum为累加和。

stack segment 
	db 10 dup(?)
stack ends
data segment 
	n dw ?
	sum dw ?
	infor1 db "1+2+...+$"
data ends
code segment
	assume ds:data,cs:code,ss:stack
start: mov ax,data
	   mov ds,ax
	   mov ax,0;存放累加和
	   mov bx,0;存放次数
	   
loop1: inc bx
		add ax,bx
		cmp ax,60000;比较是否小于60000
		jb loop1
		mov n,bx
		mov sum,ax
		
		;输出结果
		mov dx,offset infor1
		mov ah,09h
		int 21h
		
		;输出多位数n
		mov ax,n
		mov cx,0 ;记录位数
		mov bx,10;用来取余
		mov dx,0
loop2: div bx	;ax/bx,ax=商，dx=余数
		push dx ;余数入栈！
		inc cx;	位数加1
		cwd	;al->ax
		cmp ax,0
		jnz loop2;ax不为0
loop3: pop dx	;从栈里面输出,出栈到dx（16位！）
	   add dl,'0'
	   mov ah,02h
	   int 21h
	   loop loop3
	   
	   ;输出=
	   mov dl,'='
	   mov ah ,02h
	   int 21h
	   
	   ;输出多位数sum
		mov ax,sum
		mov cx,0 ;记录位数
		mov bx,10;用来取余
		mov dx,0
loop4: div bx	;ax/bx,ax=商，dx=余数
		push dx ;余数入栈！
		inc cx;	位数加1
		cwd	;al->ax
		cmp ax,0
		jnz loop4;ax不为0
loop5: pop dx	;从栈里面输出,出栈到dx（16位！）
	   add dl,'0'
	   mov ah,02h
	   int 21h
	   loop loop5
	   
		mov ah,4ch
		int 21h
code ends
	end start

		
	
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73

3，计算1+2+…+n=?，其中n通过键盘输入，累加和小于216。要求在屏幕上提供如下信息：
Please input a number(1-361): ；出现此信息后通过键盘输入一个小于362的无符号整数，
；使累加和小于一个16位无符号二进制数所能表示的范围
1+2+…+n=sum ；其中n为用户输入的数，sum为所求的累加和

DATA  SEGMENT
    INF1  DB "Please input a number (1-361):$" 
	IBUF  DB 7,0,6 DUP(?)
	OBUF  DB 6 DUP (?)
DATA ENDS
CODE  	SEGMENT
      	ASSUME CS: CODE, DS: DATA
START:	MOV	AX, DATA
      	MOV  DS, AX
		MOV  CX, AX
		
		mov dx,offset INF1;输出提示信息
		mov ah,09h
		int 21h
		
		mov dx,offset IBUF;输入一个十进制数
		mov ah,0ah;键入并显示字符串
		int 21h
		mov cl,IBUF+1 ;十进制数的位数送cx
		mov ch ,0
		mov si,offset IBUF+2;指向输入的第一个字符（最高位）
		mov ax,0;开始将十进制数转换为二进制数
		
again:  mov dx,10 ;((0*10+a4)*10+…)*10+a0
		mul dx	;ax*dx
		and byte ptr[si],0fh
		add al,[si]
		adc ah,0
		inc si
		loop again
		
		mov cx,ax
		mov ax,0
		mov bx,1
		
loop2: add ax,bx
		inc bx
		loop loop2
		mov bx,offset OBUF+5
		MOV  	BYTE PTR [BX],'$'
		MOV  	CX, 10		;做（DX）：（AX）/10运算
LOOP1:	MOV		DX, 0		;被除数高16位清0
 		DIV  	CX
		ADD  	DL, 30H		;将DL中的一位十进制数转换为ASCII码
		DEC  	BX
    	MOV  	[BX], DL
		OR   	AX, AX
		JNZ  	LOOP1		;判断商是否为0，不为0继续
		mov 	dl,0ah;换行
		mov 	ah,02h
		int 	21h
		MOV  	DX, BX		;显示转换得到的十进制数
		MOV  	AH, 09H
        INT  	21H			
		
		MOV  	AH, 4CH
      	INT  	21H
CODE ends
	end START

		
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61