Добавил:
Upload
Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз:
Предмет:
Файл:Лабораторные работы по СП (1-20) / 08 / POISK
.txt ;----------------------------------------------------------
;prg27_429.asm - Џа®Ја ¬¬ «ЁҐ©®Ј® Ї®ЁбЄ ў ¬ ббЁўҐ
; (ў аЁ в 1).
;‚室: MAS[N] - ҐгЇ®ап¤®зҐ п Ї®б«Ґ¤®ў ⥫м®бвм ¤ў®Ёзле
; § 票© ¤«Ё®© N; K - ЁбЄ®¬®Ґ § 票Ґ
;‚л室: I - Ї®§ЁжЁп ў MAS[N] (0<I<N-1), ᮮ⢥вбвўгой п
; ©¤Ґ®¬г бЁ¬ў®«г.
;----------------------------------------------------------
MASM
MODEL SMALL
.DATA
;‡Ђ„Ђ…Њ ЊЂ‘‘€‚
MAS DB 50H,08H,52H,06H,90H,17H,89H,27H,65H,42H,15H,51H,61H,67H,76H,70H
N=$-MAS
K DB 15H
.STACK 256
.486
.CODE
MAIN:
;ЌЂ—_ЏђЋѓ
MOV DX,@DATA
MOV DS,DX
;I:=0
XOR SI,SI ;I=(SI):=0
MOV AL,K
;S2:
;EC‹€ K==MAS[I], ’Ћ Џ…ђ…‰’€_ЌЂ _EXIT
S2: CMP AL,MAS[SI]
JE OK
;I:=I+1
INC SI
;EC‹€ I=<N ’Ћ Џ…ђ…‰’€_ЌЂ S2
CMP SI,N-1
JBE S2
;ॠЄжЁп Ґг¤ зл© аҐ§г«мв в Ї®ЁбЄ
JMP EXIT
;_EXIT:
OK: ;ॠЄжЁп г¤ зл© аҐ§г«мв в Ї®ЁбЄ
JMP EXIT
EXIT:
MOV AX,4C00H
INT 21H
END MAIN
;prg27_429.asm - Џа®Ја ¬¬ «ЁҐ©®Ј® Ї®ЁбЄ ў ¬ ббЁўҐ
; (ў аЁ в 1).
;‚室: MAS[N] - ҐгЇ®ап¤®зҐ п Ї®б«Ґ¤®ў ⥫м®бвм ¤ў®Ёзле
; § 票© ¤«Ё®© N; K - ЁбЄ®¬®Ґ § 票Ґ
;‚л室: I - Ї®§ЁжЁп ў MAS[N] (0<I<N-1), ᮮ⢥вбвўгой п
; ©¤Ґ®¬г бЁ¬ў®«г.
;----------------------------------------------------------
MASM
MODEL SMALL
.DATA
;‡Ђ„Ђ…Њ ЊЂ‘‘€‚
MAS DB 50H,08H,52H,06H,90H,17H,89H,27H,65H,42H,15H,51H,61H,67H,76H,70H
N=$-MAS
K DB 15H
.STACK 256
.486
.CODE
MAIN:
;ЌЂ—_ЏђЋѓ
MOV DX,@DATA
MOV DS,DX
;I:=0
XOR SI,SI ;I=(SI):=0
MOV AL,K
;S2:
;EC‹€ K==MAS[I], ’Ћ Џ…ђ…‰’€_ЌЂ _EXIT
S2: CMP AL,MAS[SI]
JE OK
;I:=I+1
INC SI
;EC‹€ I=<N ’Ћ Џ…ђ…‰’€_ЌЂ S2
CMP SI,N-1
JBE S2
;ॠЄжЁп Ґг¤ зл© аҐ§г«мв в Ї®ЁбЄ
JMP EXIT
;_EXIT:
OK: ;ॠЄжЁп г¤ зл© аҐ§г«мв в Ї®ЁбЄ
JMP EXIT
EXIT:
MOV AX,4C00H
INT 21H
END MAIN
Соседние файлы в папке 08