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,8050,1183000,1843000,2759000,3753000,4649000,5937000
  dw 3,7,9,1,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 bx,0
      mov di,0
      mov cx,21
    s:mov dx,cx
      mov si,0
      mov cx,4
      s0:mov al,[di]
         mov es:[bx+si],al
         inc di
         inc si
      loop s0  
      add bx,16
      mov cx,dx
    loop s
      mov bx,0
      mov cx,21
   s1:mov dx,cx
      mov si,0
      mov cx,2
      s2:mov ax,[di] 
         mov es:[bx].5[si],ax
         add di,2
         add si,2
      loop s2
      add bx,16
      mov cx,dx
   loop s1
      mov bx,0
      mov cx,21
   s3:mov ax,[di]  
      mov es:10[bx],ax
      add di,2
      add bx,16
   loop s3
      mov bx,0
      mov si,0
      mov cx,21
   s4:mov ax,es:5[si]
      mov dx,es:7[si]
      mov bx,es:10[si]
      div bx
      mov es:13[si],ax
      add si,16
    loop s4   
      mov ax,4c00h
      int 21h
codesg ends
end start