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'     ;84

dd 16,22,382,1356,2390,8000,16000,24486,50065,97479,140417,197514
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

code segment
start:mov ax,data
      mov ds,ax
      mov ax,talbe
      mov es,ax
      mov bx,0
      mov si,0
      mov di,0
      mov cx,
    s:mov ax,[bx]
      mov es:[si],ax
      mov ax,[bx+2]
      mov es:[si+2],ax

      mov ax,[bx+84]
      mov es:[si+5],ax
      mov ax,[bx+86]
      mov es:[si+7],ax

      mov ax,[di+168]
      mov es:[si+10],ax

      mov ax,[bx+84]
      mov dx,[bx+86]
      div word ptr ds:[di+168]
      mov es:[si+13,ax]

      mov byte ptr es:[si+4],20h
      mov byte ptr es:[si+9],20h
      mov byte ptr es:[si+12],20h
      mov byte ptr es:[si+0fh],20h

      add si,16
      add di,2
      add bx,4

      loop s

      mov ax,4ch
      int 21h
      code ends
      end start