实验七答案

wangyupeng

写了很长时间的代码，有兴趣可以看看

assume cs:code,ds:data,es: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,24486,50065,97479,140417,197514
    dd 34980,590827,803530,1183000,1843000,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,15257,17800
data ends

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

code segment

start:  mov ax,data
        mov ds,ax
        mov ax,table
        mov es,ax

        mov cx,21
        mov bx,0
        mov si,0
    s0: mov ax,[bx].0
        mov es:[si],ax
        add si,2
        add bx,2
        mov ax,[bx].0
        mov es:[si],ax
        add si,14
        add bx,2
        loop s0

；将年份存入table段

        mov cx,21
        mov si,5
        mov bx,0
    s1: mov ax,[bx].54h
        mov es:[si],ax
        add si,2
        add bx,2
        mov ax,[bx].54h
        mov es:[si],ax
        add si,14
        add bx,2
        loop s1

；将收入存入table段

        mov cx,21
        mov si,0ah
        mov bx,0
    s2: mov ax,[bx].0a8h
        mov es:[si],ax
        add si,10h
        add bx,2
        loop s2

；将员工数存入table段

        mov cx,21
        mov si,5
        mov di,0dh
        mov bx,0ah
    s3: mov ax,es:[si]
        add si,2
        mov dx,es:[si]
        div word ptr es:[bx]
        mov es:[di],ax
        add di,10h
        add si,14
        add bx,10h
        loop s3

；从table段中读取收入和员工数，相除，将结果存入table

        mov ax,4c00h
        int 21h

code ends
end start