ПОМОГИТЕ ПОЖАЛУЙСТА !!! Я не понимаю как это делать!!!!

Какое значение примет переменная С в результате выполнения программы:

Var A, B, C: integer;

Begin

A:=4;

B:=A*3-6;

If B>2*A Then A:=2;

IF B<2*A Then A:=5;

If B=2*A Then A:=B-A;

C:=A*B+A-B;

Writeln (‘C=’, C);

End.

1) 8;
2) 22;
3) 29.
4) 32