Guest User

Untitled

a guest
Aug 28th, 2018
154
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. ;8 задача
  2. ;Сумата от четните неотрицателни елементи
  3.  
  4.     LEA SI,BUF
  5.     MOV CX,SIZE
  6.     CALL    ZAD8
  7.     RET
  8. ZAD8:   LODSW
  9.     TEST    AX,1
  10.     JNZ ZAD8L
  11.     TEST    AX,AX
  12.     JL  ZAD8L
  13.     ADD BX,AX
  14.     ADC DX,0
  15. ZAD8L:  LOOP    ZAD8
  16.     MOV AX,BX
  17.     RET
  18. BUF DW  -1,32766,5,23256,-8,20224
  19. SIZE    EQU ($-BUF)/TYPE BUF
Add Comment
Please, Sign In to add comment