Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- N equ 5
- dseg at 30h
- addr_elem: ds 1
- min: ds 1
- cseg
- sjmp Start
- org 0030h
- Mass: db 1, 2, 3, 4, 5
- Start:
- mov r0, #N ; Количество элементов
- mov addr_elem, #Mass
- mov dph, #0
- mov dpl, addr_elem
- clr a
- movc a, @a + dptr ; Считали элемент
- mov min, a ; 1-ый элемент начальный минимум
- inc dptr
- search_min:
- clr a
- movc a, @a + dptr
- mov r1, min
- subb a, r1
- jnc no_swap_min
- mov min, a
- no_swap_min:
- inc dptr
- djnz r0, search_min
- end
- ; в min будет минимум
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement