
Файлы преподавателя (наиболее достойные) / Вариант
.doc
Тип |
(7*b-54+a)/(25/c-1+c) |
Ub |
7*b uw |
|
7*b-54 sw |
|
7*b-54+a shisl sw |
|
25/c ub |
|
25/c-1 ub |
|
25/c-1+c znam ub |
|
shisl/znam sb |
.MODEL Large,C
.data
Extrn aaaS:byte,cccS:byte,dddS:byte,shisl:dword,znam:word,rez:word,bbbS:byte
.code
Public Lab3S
Lab3S proc far
;shisl *******************************
mov al,7
mul bbbS
sub ax, 54
mov bx,0
mov bl,aaaS
add ax,bx
cwd
mov word ptr shisl,ax
mov word ptr shisl+2,dx
;znam ********************************
mov ax,25 ; ax=25
div cccS ; al-25/c
sub al,1 ; al=25/c-1
add al,cccS ; al=25/c-1+c
mov ah,0
mov znam,ax ; znam=25/c-1+c
mov dx, word ptr shisl+2
mov ax, word ptr shisl
idiv znam
mov rez,ax
ret
Lab3S endp
end5
Тип |
(7*b-54+a)/(25/c-1+c) |
sb |
7*b sw |
|
7*b-54 sw |
|
7*b-54+a shisl sw |
|
25/c sb |
|
25/c-1 sb |
|
25/c-1+c znam sb |
|
shisl/znam sb |
.MODEL Large,C
.data
Extrn aaaS:byte,cccS:byte,dddS:byte,shisl:dword,znam:word,rez:word,bbbS:byte
.code
Public Lab3S
Lab3S proc far
;shisl *******************************
mov al,7
imul bbbS
sub ax, 54
mov cx,ax ;-------------
mov al,aaaS ;
cbw ;
add ax,cx
cwd
mov word ptr shisl,ax
mov word ptr shisl+2,dx
;znam ********************************
mov ax,25 ; ax=25
idiv cccS ; al-25/c
sub al,1 ; al=25/c-1
add al,cccS ; al=25/c-1+c
cbw ;-------------------
mov znam,ax ; znam=25/c-1+c
; mov ax,shisl
mov dx, word ptr shisl+2
mov ax, word ptr shisl
idiv znam
mov rez,ax
ret
Lab3S endp
end