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

Question

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

Answer 1

//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