variant logical ops

Smart pascal source code


var a, b: Variant;
a := True;
b := False;

WriteLn(a or b);
WriteLn(a and b);
WriteLn(a xor b);

a := 1;
b := 0;

WriteLn(a or b);
WriteLn(a and b);
WriteLn(a xor b);

{<<< RESULT - CONSOLE LOG >>>
-----------------------------
True
False
True
1
0
1
-----------------------------
{<<<<<<<<< THE END >>>>>>>>>}

var a, b;

/* <<< main JS >>> */

   a = true;
   b = false;
   WriteLn((a||b));
   WriteLn((a&&b));
   WriteLn((a^b));
   a = 1;
   b = 0;
   WriteLn((a||b));
   WriteLn((a&&b));
   WriteLn((a^b));