Умножение и деление

; FASM программа для вычисления k = (a * b) / (b * c)
; Входные данные: a, b, c - 16-битные целые числа
 
format PE console
entry start
 
include 'win32a.inc'
 
section '.data' data readable writeable
    prompt_a db 'Введите a: ', 0
    prompt_b db 'Введите b: ', 0
    prompt_c db 'Введите c: ', 0
    result_msg db 'Результат k: ', 0
    result db '0', 0
    buffer db '0', 0
    err_msg db 'Ошибка: деление на ноль', 0
 
section '.bss' bss
    a resw 1
    b resw 1
    c resw 1
    k resw 1
 
section '.text' code executable
start:
    ; Ввод a
    invoke StdOut, prompt_a
    invoke StdIn, buffer, 10
    invoke StrToInt, buffer
    mov [a], ax
 
    ; Ввод b
    invoke StdOut, prompt_b
    invoke StdIn, buffer, 10
    invoke StrToInt, buffer
    mov [b], ax
 
    ; Ввод c
    invoke StdOut, prompt_c
    invoke StdIn, buffer, 10
    invoke StrToInt, buffer
    mov [c], ax
 
    ; Проверка на деление на ноль
    mov ax, [c]
    cmp ax, 0
    je .div_by_zero
 
    ; k = (a * b) / (b * c)
    mov ax, [a]
    imul ax, [b]       ; a * b
    mov bx, [b]
    imul bx, [c]       ; b * c
    mov cx, bx
    test cx, cx        ; Проверка делителя на ноль
    jz .div_by_zero
 
    ; Деление
    xor dx, dx         ; Очистка dx перед делением
    idiv cx             ; Делим (a * b) на (b * c)
    mov [k], ax        ; Сохраняем результат k
 
    ; Печать результата
    invoke IntToStr, ax, buffer, 10
    invoke StdOut, result_msg
    invoke StdOut, buffer
    jmp .exit
 
.div_by_zero:
    invoke StdOut, err_msg
 
.exit:
    invoke ExitProcess, 0

    ; Деление
    xor dx, dx         ; Очистка dx перед делением
    idiv cx             ; Делим (a * b) на (b * c)