p93 加一减一运算，可能会产生上溢、下溢

//93
program test;
var 
  j:shortint;
  k:byte;
begin
  writeln('+1 :');
  j:=127;
  writeln(j:4,'  ',binstr(j,8));
  inc(j);
  writeln(j:4,'  ',binstr(j,8));
  k:=255;
  writeln(k:4,'  ',binstr(k,8));
  inc(k);
  writeln(k:4,'  ',binstr(k,8));
  //上溢：最大转到最小
  writeln;
  writeln('-1 :');
  j:=-128;
  writeln(j:4,'  ',binstr(j,8));
  dec(j);
  writeln(j:4,'  ',binstr(j,8));
  k:=0;
  writeln(k:4,'  ',binstr(k,8));
  dec(k);
  writeln(k:4,'  ',binstr(k,8));
  //下溢：最小转到最大
  //类似于时钟
end.