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

//PascalABC.Net 3.1.0.1200
var
    a, b: integer;

begin
    a := -3;
    b := -a - a;
    a := a + 2;
    a := -b + a * b;
    
    Println(a, b);
end.

Вывод -12 6