Добавил:
СПбГУТ * ИКСС * Программная инженерия Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Скачиваний:
35
Добавлен:
10.09.2019
Размер:
44.03 Кб
Скачать

Тип

(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

Соседние файлы в папке Файлы преподавателя (наиболее достойные)