- assume cs:code
- 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个字符串,每个占4字节,首偏移[0h]
- dd 16,22,382,1356,2390,8000,16000,24486,50065,97479,140417,197514
- dd 345980,590827,803530,1183000,1843000,2759000,3753000,4649000,5937000
- ;以上21年的公司年收入,dword型数据,每个占4字节,首偏移[54h]
- dw 3,7,9,13,28,38,130,220,476,778,1001,1442,2258,2793,4037,5635,8226
- dw 11542,14430,15257,17800 ;21年公司雇员,word型数据,占2字节,首偏移[0A8h]
- 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 di,0 ;用于年份和收入的偏移
- mov si,0 ;用于雇员偏移
- mov bx,0 ;用于表格行偏移
- mov cx,21 ;循环次数
- s:mov ax,ds:[di]
- mov es:[bx],ax
- mov ax,ds:[di+2]
- mov es:[bx+2],ax ;以上复制年份
- mov ax,ds:[0A8h+si]
- mov es:[bx+0Ah],ax ;以上复制雇员
- mov ax,ds:[54h+di]
- mov es:[5h+bx],ax
- mov dx,ds:[56h+di]
- mov es:[7h+bx],dx ;以上复制收入
- div word ptr es:[0Ah+bx]
- mov es:[0Dh+bx],ax;以上计算并保存平均收入
- add di,4
- add si,2
- add bx,16
- loop s
-
- mov ax,4c00h
- int 21h
- code ends
- end start
复制代码 |