Определите значение целочисленной переменной z после выполнения следующего

Определите значение целочисленной переменной z после выполнения следующего фрагмента программы, в котором a и b - переменные вещественные (действительного) типа.

a:=2;
b:=2*a;
a:=b-2;
if a lt; b
then z:=3*b+4
else z:=2*a-1;