Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- org 100h
- start:
- mov ah, $09
- mov dx, str1
- int 21h
- mov ah, $02
- mov dx, 0x0D0A
- int 21h
- mov ah, $09
- mov dx, str2
- int 21h
- mov ah, $02
- mov dx, 0x0D0A
- int 21h
- mov ah, $09
- mov dx, str3
- int 21h
- mov ax, [c]
- sub ax, [b]
- mov bx, $2
- mul bx
- mov bx, ax
- mov ax, [a]
- mov cx, $2
- mul cx
- add bx, ax
- mov ax, [d]
- add ax, $3
- xchg ax, bx
- div bx
- mov [res], ax
- mov ax, [res]
- add ax, '0' ; òàêîé âûâîä ìîæåò êîððåêòíî âûâåñòè òîëüêî ÷èñëà îò 0 äî 9
- mov dx,ax
- mov ah, $02
- int 21h
- mov ah,$08
- int 21h
- ret
- str1 db '(2a + (c - b) * 2)/(d + 3)$'
- str2 db 'a = 2, b = 4, c = 6, d = 1$'
- str3 db 'result: $'
- a dw 2h
- b dw 4h
- c dw 6h
- d dw 1h
- res dw 0
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement