begin
  var b: byte;
  b += 1;b += 1;
end.