лабораторная работа / лабораторные работы по LAZARUS / Найти кол
.docНайти кол-во полож. (отиц.) элем массива
DOSSEG
.MODEL small
.stack 100h
.data
titl db 4,-5,6,-1,2,-7,6,-2,-3,3
.code
mov ax,@data
mov ds,ax
mov cx,10
mov dx,0000
lea bx,titl
m1:
mov al,[bx]
or al,al
js m2 (JNS)отриц
inc dx
m2:
inc bx
loop m1
mov ah,4ch
int 21h
END
Найти суму элем масс попавших в интервал -10до10 кол-во 10
DOSSEG
.MODEL small
.stack 100h
.data
titl db -20,100,1,-70,70,8,12,-3,15,9
.code
mov ax,@data
mov ds,ax
mov cx,10
mov dx,0000
lea bx,titl
m1:
mov al,[bx]
cmp ax,-10 (опер сравнения)
jl m2
cmp ax,10
jg m2
add ax,dx
mov dx,ax
m2:
inc bx
loop m1
mov ah,4ch
int 21h
END
Найти суму полож (отриц) элем массива
DOSSEG
.MODEL small
.stack 100h
.data
titl db 4,-5,6,-1,2,-7,6,-2,-3,3
.code
mov ax,@data
mov ds,ax
mov cx,10
mov dx,0000
lea bx,titl
m1:
mov al,[bx]
mov ah,0
cmp al,0
jl m2 (jle)
add ax,dx
mov dx,ax
m2:
inc bx
loop m1
mov ah,4ch
int 21h
END
Найти кол-во отрицат (пол) элем массива, попавш в зад интервал(-12,-3)11
DOSSEG
.MODEL small
.stack 100h
.data
titl db -1,-5,1,-6,-4,2,-5,7,-7,4,3
.code
mov ax,@data
mov ds,ax
mov cx,11
mov dx,0000
lea bx,titl
m1:mov ax,[bx]
cmp al,-12
jl m2 (jle)
cmp al,-3
jg m2 (jge)
inc bx
m2:inc bx
loop m1
mov ah,4ch
int 21h
END
Найти суму отрицат (пол) элем мас
сива, попавш в зад интервал(-12,-3)11
DOSSEG
.MODEL small
.stack 100h
.data
titl db -1,-5,1,-6,-4,2,-5,7,-7,4,3
.code
mov ax,@data
mov ds,ax
mov cx,11
mov dx,0000
lea bx,titl
m1:mov ax,[bx]
cmp al,-12
jl m2 (jle)
cmp al,-3
jg m2 (jge)
add ax,dx
mov dx,ax
m2:inc bx
loop m1
mov ah,4ch
int 21h
END