.486
.model flat, stdcall
INCLUDE stdlib.inc
INCLUDELIB msvcrt.lib

.DATA
  LEN EQU 6
  ar dw 67, 2, 3, 15, 26, 26
  sum dd ?
  prod dd 1
.CODE
main:
  mov ecx, LEN
  mov si, offset ar


start:
  dec ecx
  jl stop

  mov ax, [si]
  add sum,ax
  s
  mul prod
  mov prod,ax

  add esi, TYPE ar

  jmp start
stop:
  call exit
END main