x-Aaron 发表于 2020-5-31 14:00:48

实验七

;实验七
assume cs:codesg

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, 197524
        dd 345980, 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

codesg segment
start:
                mov ax, data
                mov ds, ax
               
                mov ax, table
                mov es, ax
               
                ;循环初始值
                mov cx, 21
                mov bx, 0
                mov si, 0
                mov di, 0
               
s:
                ;年份
                mov ax, 0
                mov dx, 2
               
                mov es:, ax
                mov es:, dx
                mov byte ptr es:, ' '
               
                ;收入
                mov ax, 54H
                mov dx, 56H
               
                mov es:, ax
                mov es:, dx
                mov byte ptr es:, ' '

               
                ;人数
                mov ax, 0A8H
               
                mov es:, ax
                mov byte ptr es:, ' '
               
                ;平均值
                mov ax, 54H
                mov dx, 56H
               
                div word ptr 0A8H
                mov es:, ax
                mov byte ptr es:, ' '
               
                ;循环条件
                add si, 4
                add di, 2
                add bx, 10H
                loop s

                mov ax, 4c00H
                int 21H
codesg ends
end start
页: [1]
查看完整版本: 实验七