{ GPC demo program. For copying conditions see the file `COPYING.DEMO'. }

program AndOperatorDemo;
var x: Integer;
begin
  x := x and $0000ffff;
end.