{$J+}
const
  w1 : word = 1;

begin
  w1:=2;
end.