Арифметические операции!!( исправить )

[Jereme]

Нужно чтоб вычисляло по формуле a/b+c и выделяло остаток!!!


model small
.stack 100h
.data
mes1 db 'vvedite a$'
mes2 db 0ah,0dh,'ўўҐ¤ЁвҐ b$'
mes3 db 0ah,0dh,'ўўҐ¤ЁвҐ c$'
mes4 db 0ah,0dh,'otvet: $'
mes5 db 0ah,0dh,'ost: $'
d db ?
a db ?
b db ?
c db ?
n db ?
otvet db ?,?,?,'$'
ost db ?,?,?,'$'
.code
main:
mov ax,@data
mov ds,ax
xor ax,ax

mov ah,09h
mov dx,offset mes1
int 21h
mov ah, 01h
int 21h ; ввод первого символа и запись его в al
sub al, 30h ; запись в al первой цифры
mov ah,0 ; расширение до слова
mov bx,10
mov cx,ax ; запись в cx первой цифры
M1: mov ah,01h
int 21h ; запись в al следующего символа
cmp al,0dh ; сравнение с кодом Enter
je End1 ; конец ввода
sub al, 30h ; в al – следующая цифра
cbw ; расширение до слова
xchg ax,cx ;?
mul bx ;?
add cx, ax ;?
jmp M1 ; продолжение ввода
End1: mov a, cl

mov ah,09h
mov dx,offset mes2
int 21h
mov ah, 01h
int 21h ; ввод первого символа и запись его в al
sub al, 30h ; запись в al первой цифры
mov ah,0 ; расширение до слова
mov bx,10
mov cx,ax ; запись в cx первой цифры
M2: mov ah,01h
int 21h ; запись в al следующего символа
cmp al,0dh ; сравнение с кодом Enter
je End2 ; конец ввода
sub al, 30h ; в al – следующая цифра
cbw ; расширение до слова
xchg ax,cx ;?
mul bx ;?
add cx, ax ;?
jmp M2 ; продолжение ввода
End2: mov b, cl


mov ah,09h
mov dx,offset mes3
int 21h
mov ah, 01h
int 21h ; ввод первого символа и запись его в al
sub al, 30h ; запись в al первой цифры
mov ah,0 ; расширение до слова
mov bx,10
mov cx,ax ; запись в cx первой цифры
M3: mov ah,01h
int 21h ; запись в al следующего символа
cmp al,0dh ; сравнение с кодом Enter
je End3 ; конец ввода
sub al, 30h ; в al – следующая цифра
cbw ; расширение до слова
xchg ax,cx ;?
mul bx ;?
add cx, ax ;?
jmp M3 ; продолжение ввода
End3: mov c, cl
mov al,a
div b
mov bl,c
add al,bl
mov ah,0
div bl
mov d,ah
cbw
mov n,al
mov bl, 10
mov al,n
mov ah,0 ; расширение N в ax до слова
div bl ; ah=c, al=ab
add ah, 30h
mov otvet+2, ah ; записали последнюю цифру
mov ah,0 ; al=ab, расширили до слова
div bl ;ah=b, al=a
add ax,"00" ; ah=b+’0’, al=a+’0’
mov otvet+1, ah ;записали среднюю цифру
mov otvet, al ; записали первую цифру
mov ah,09h
mov dx,offset mes4
int 21h
mov ah,09h
mov dx,offset otvet
int 21h

mov bl, 10
mov al,d
mov ah,0 ; расширение N в ax до слова
div bl ; ah=c, al=ab
add ah, 30h
mov ost+2, ah ; записали последнюю цифру
mov ah,0 ; al=ab, расширили до слова
div bl ;ah=b, al=a
add ax,"00" ; ah=b+’0’, al=a+’0’
mov ost+1, ah ;записали среднюю цифру
mov ost, al ; записали первую цифру

mov ah,09h
mov dx,offset mes5
int 21h
mov ah,09h
mov dx,offset ost
int 21h


mov ah, 01h
int 21h
mov ax,4c00h
int 21h
end main

[airyashov]

остаток чего? вернее от чего