Определите значение переменной а после выполнения данного алгоритма b: =4 a: =3 b: =7-2*a-b a: =b/3-a

Uses crt;
const a=3;     
         b=4;
var A,B:real;
begin
A:=b/3-a;
write('Значение A',A:5:2);
B:=7-2*a-b
write('Значение B',B:5:2);
end.

B=4
a=3
b=7-2*a-b=7-2*3-4=7-6-4=-3
a=b/3-a=-3/3-3=-1-3=-4
ответ:a=-4
b=-3