Question

Какое значение примет переменная С в результате выполнения программы: Var A, B, C: integer; Begin A:=4; B:=A*3-6; If B<3*A Then A:=7; IF B>3*A Then A:=5; If B=3*A Then A:=B-A; C:=A*B+A-B; Writeln (‘C=’, C); End.