lab1farasemn

; z=(3+(c*c))/(6-(b*b))+((a*a-b*b)/(a*a+c*c))

assume cs:code,ds:data

data segment
a db 5
b db 6
c db 10
a2 dw ?
b2 dw ?
c2 dw ?
prima dw ?
rez dw ?
data ends

code segment
start:
mov ax, data
mov ds, ax

mov al, b
mul b
mov b2, ax
mov ax, 6
sub ax, b2 ; in ax e 6-b*b

mov bx, ax ; in bx e 6-b*b

mov al, c
mul c
mov c2, ax
add ax, 3 ; in ax e 3+c*c
mov dx, 0

div bx ; in ax e (3+c*c)/(6-b*b)

mov prima, ax ; in prima e (3+c*c)/(6-b*b)

mov al, a
mul a ; in ax e a*a
mov a2, ax ; in a2 e a*a

add ax, c2 ; in ax e a*a + c*c

mov bx, ax ; in bx e a*a + c*c

mov ax, a2 ; in ax e a*a
sub ax, b2 ; in ax e a*a - b*b
mov dx, 0

div bx ; in ax e rezulatul (a*a - b*b)/(a*a + c*c)

add ax, prima

mov rez, ax

mov ax, 4c00h
int 21h

code ends
end start