Задание

Определить значение переменной с после выполнения следующего фрагмента программы
var a, b, c: integer;
begin
a := 22;
b := 3;
a := -2* b + a div 2 ;
if \(a \\lt b\) then
c := 4 * b-3*a
else c := 3*a+4*b;
writeln \(c\);
end.