помогите пжИ если мождно обьясните

var

   x, y : integer;

begin

   write('x = ');

   readln(x);

   if (x gt; -1) and (x lt; 4) then y := 15-3*x else y := 6+4*x;

   writeln('y = ', y);

end.

сначала вводим x

проверяем, если x больше -1 и меньше 4 то считаем y=15-3*x по другому считаем y=6+4*x

выводим y