Object Pascal - Bitműveleti operátorok

Több bitművelet áll rendelkezésünkre, a bitműveletek segitségével egész számok bitjeit állíthatjuk be vagy épp lekérdezhetjük.
Biteltoló balra
par1 shl par2
Biteltoló jobbra
par1 shr par2
Bitenkénti ÉS
par1 and par2
Bitenkénti VAGY
par1 or par2

Object Pascal

További példaprogram részletek:
631 xor ($F0 xor k)
(i and 4)
(32 shr 2)
not 2
64 or (i or k)
128 shl (j shl(3 + i))
Más nyelveken: en hu cz sk