p78 德摩根定律

//78
program test;
var 
  j,k:byte;
begin
  randomize; //有这句，每次取得的随机数会不同。
  j:=random(256); //取得256以内的随机数
  k:=random(256);
  writeln( j,'  ',k );
  writeln;
  writeln( not(j or k) );
  writeln( not(j) and not(k) );
  writeln;
  writeln( not(j and k) );
  writeln( not(j) or not(k) );
end.