汇编语言 我的试验七 解答答案

无限幻想

assume cs: codesg, ds: data, ss: table
data segment
db '1975','1976','1977','1978','1979','1980','1981','1982','1983'
db '1984','1985','1986','1987','1988','1989','1990','1991','1992'
db '1993','1994','1995'
dd 16,22,382,1356,2390,8000,16000,24886,50065,97179,140417,197514
dd 345980,590827,803530,118300,184300,2759000,3753000,4649000,5937000
dw 3,7,9,13,28,38,130,220,476,778,1001,1442,2258,2793,4037,5635,8226
dw 11542,14430,15527,17800
data ends
table segment
db 21 dup ('year summ ne ?? ')
table ends
codesg segment
start: mov ax, data
       mov ds, ax
    mov ax, table
    mov ss, ax
   
    mov bx, 0
    mov bp, 0
    mov si, 0
    mov di, 0
    mov cx, 21
  s:
    push cx ; 将cx值压栈
    mov cx, 4 ;确定内循环次数
s0:
    mov al,[bx+si]
    mov [bp+si], al
    inc si
    loop s0 ;此循环将年份放至指定位置
   
    mov ax, [bx+84]
    mov dx, [bx+86]
    mov ss:[bp+5], ax
    mov ss:[bp+7], dx  ;此步骤将收入放至指定位置
   
    mov ax, [di+168]
    mov ss:[bp+0ah], ax ;此步骤将雇员数放至指定位置
   
    mov ax, [bx+84]
    mov dx, [bx+86]
    div word ptr ds:[di+168]
    mov ss:[bp+0dh], ax ;此步骤将收入与雇员数相除后把商放至指定位置
   
    add bx, 4
    mov si, 0
    add bp, 10h
    add di, 2
    pop cx ;外循环cx值出栈，恢复外循环cx值
    loop s
    mov ax, 4c00h
    int 21h
codesg ends
end start

里面的有一个cx循环压栈，我没有设置栈顶，不知会压到那里，但能够出栈，而程序DEBUG正常，大家讨论下

lukelqz

1. assume cs:codesg
   
2. data segment
   
3. db '1975','1976','1977','1978','1979','1980','1981','1982','1983'
   
4. db '1984','1985','1986','1987','1988','1989','1990','1991','1992'
   
5. db '1993','1994','1995'
   
6. 
   
7. dd 16,22,382,1356,2390,8000,16000,24486,50065,97479,140417,197514
   
8. dd 345980,590827,803530,1183000,1843000,2759000,3753000,4649000,5937000
   
9. 
   
10. dw 3,7,9,13,28,38,130,220,476,778,1001,1442,2258,2793,4037,5635,8226
    
11. dw 11542,11430,15257,17800
    
12. data ends
    
13. 
    
14. table segment
    
15. db 21 dup ('year summ ne ?? ')
    
16. table ends
    
17. 
    
18. codesg segment
    
19. start: mov ax,data
    
20. mov ds,ax
    
21. mov ax,table
    
22. mov ss,ax
    
23. mov bx,0
    
24. mov bp,0
    
25. mov di,0
    
26. 
    
27. mov cx,21
    
28. s: mov ax,[bx]
    
29. mov [bp],ax
    
30. mov ax,2[bx]
    
31. mov 2[bp],ax ;写入年份
    
32. 
    
33. mov ax,84[bx]
    
34. mov 5[bp],ax
    
35. mov dx,86[bx]
    
36. mov 7[bp],dx ;写入收入
    
37. 
    
38. div word ptr 168[di]
    
39. mov 0dh[bp],ax ;写入人均收入
    
40. 
    
41. mov ax,168[di]
    
42. mov 0ah[bp],ax ;写入雇员数
    
43. 
    
44. add bx,4
    
45. add di,2
    
46. add bp,10h
    
47. loop s
    
48. 
    
49. mov ax,4c00h
    
50. int 21h
    
51. codesg ends
    
52. end start
    

复制代码

寄存器基本和你用的一样。不过写入年份的那个循环可以不要，所以少用个si，就和收入的写法一样。你把人均收入调到雇员数前面，

1. mov ax, [bx+84]
   
2. mov dx, [bx+86]
   

复制代码

这一步也可以省了

hyjuncheng888

assume cs:codesg,ds:data,ds:table
data segment
        db '1975','1976','1977','1978','1979','1980','1981','1982','1983'
        db '1984','1985','1986','1987','1988','1989','1990','1991','1992'
        db '1993','1994','1995'
        ;以上是表示21年的21个字符串
        dd 16,22,382,1356,2390,8000,16000,24486,50065,97479,140417,197514
        dd 345980,590827,803530,1183000,1843000,2759000,3753000,4649000,5937000
        ;以上是表示21年公司总收入的21个word型数据
        dw 3,7,9,13,28,38,130,220,476,778,1001,1442,2258,2793,4037,5635,8226
        dw 11542,14430,15257,17800
        ;以上是表示21年公司雇员人数的21个word型数据
data ends

table segment
        db 21 dup ('year sume ne ?? ')
table ends

codesg segment
start:        mov ax,data
                        mov ds,ax
                        mov dx,table
                        mov es,dx
                       
                        mov bx,0
                        mov bp,0
                        mov cx,21
        s:                mov ax,ds:[bx]
                        mov es:[bp],ax
                        mov ax,ds:[54h+bx]
                        mov es:[bp+5],ax
                        mov ax,ds:[0a8h+bx]
                        mov es:[bp+0ah],ax
                        add bx,2
                        mov ax,ds:[bx]
                        mov es:[bp+2],ax
                        mov ax,ds:[54h+bx]
                        mov es:[bp+7],ax
                        add bx,2       
                        add bp,0010h
                        loop s
                        mov cx,21
                        mov bx,0
                        mov bp,0
        s1:        mov dx,es:[bp+07h]
                        mov ax,es:[bp+5h]
                        mov bx,es:[bp+0ah]
                        div bx
                        mov es:[bp+0dh],ax
                        add bp,0010h
                        loop s1
                       
                        mov ax,4c00h
                        inc 21h
                        codesg ends
end start

hyjuncheng888

谁帮我再精简一下,下面那个其实可以精简的