Найти произведение четных чисел от 1 до 10 - Assembler

Формулировка задачи:

Найти произведение четных чисел от 1 до 10 Вот есть фрагмент кода, считающий произведение чисел от 1 до 10, мне необходимо найти только произведение четных чисел, то есть 2*4*6*8*10.

masm
model small
.stack 256
.data
.code
.startup
jmp main
include io1.inc
main:
 
mov cx,10 ;cx:=10
mov ax,1 ;ax:=1
proiz:
mul cx;ax:=ax * cx
loop proiz
 
mov dh, 0
mov dl, 5
 
call procoutnum
.exit
end

Решение задачи: «Найти произведение четных чисел от 1 до 10 - Assembler»

Листинг программы

mov ax,10 ;ax:=10
mov cx,8 ;cx:=8
proiz:
mul cx;ax:=ax * cx
dec cx
loop proiz

Объяснение кода листинга программы

В начале программы устанавливается значение переменной ax равным 10.
Затем устанавливается значение переменной cx равным 8.
Далее происходит цикл proiz, который выполняется до тех пор, пока значение переменной cx больше или равно 0.
Внутри цикла выполняется операция умножения значения переменной ax на значение переменной cx.
После выполнения операции умножения значение переменной cx уменьшается на единицу.
По завершении цикла значение переменной ax будет содержать произведение всех четных чисел от 1 до 10.