Boolean with AND |&&

Smart pascal source code


var
  i: Integer;
  b: Boolean := true;

BEGIN
{ BOOLEAN with AND }

  Writeln(b and b);
  Writeln(b and true);
  Writeln(b and false);
  Writeln(true and b);
  Writeln(false and b);

  b := false;

  Writeln(b and b);
  Writeln(b and true);
  Writeln(b and false);
  Writeln(true and b);
  Writeln(false and b);

{ CONSOLE OUTPUTS

  True
  True
  False
  True
  False
  False
  False
  False
  False
  False

}

      var i = 0;
      var b = true;
      WriteLn((b&&b));
      WriteLn(b);
      WriteLn(false);
      WriteLn(b);
      WriteLn(false);
      b = false;
      WriteLn((b&&b));
      WriteLn(b);
      WriteLn(false);
      WriteLn(b);
      WriteLn(false);