var a: Boolean; b,c,d : Variant; e : Integer; begin b := 'abc'; c := null; a := b = c; a := b <> c; d := e - c; d := e + c; end.