program test2

begin

  a := 4;
  b := -1;

  c := a * b + 4;
  d := c / b;
  e := b / c;

end