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,197514
     dd 345980,590827,803530,118300,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 150h dup (0)
table ends

stack segment
      db 10h dup (0)
stack ends

codesg segment
start: mov ax,data
       mov ds,ax

       mov ax,table
       mov es,ax

       mov ax,stack
       mov ss,ax
       mov sp,10h

       sub bx,bx
       sub di,di

       mov cx,2

    s: push cx
       mov cx,15h

   s0: push cx
       mov cx,2
       sub si,si

   s1: mov ax,[di]
       mov es:[bx+si],ax
       add si,2
       add di,2
       loop s1

       add bx,10h
       pop cx

       loop s0

       mov bx,5
       pop cx

       loop s

       sub si,si
       sub bx,bx
       mov cx,21

   s2: mov ax,[di]
       mov es:[bx+0ah],ax
       mov ax,es:[bx+5+si]
       add si,2
       mov dx,es:[bx+5+si]
       div word ptr es:[bx+0ah]
       mov es:[bx+0dh],ax

       sub si,si
       add di,2
       add bx,10h

       loop s2

       mov ax,4c00h
       int 21h

codesg ends

end start


花了一晚上终于完成了！
各位大哥大姐多提宝贵意见！