Shr/fr
From Free Pascal wiki
Jump to navigationJump to search
│
Deutsch (de) │
English (en) │
français (fr) │
русский (ru) │
Généralités
Shr (Shift right) décale à droite une valeur binaire spécifié en premier opérande du nombre de bit spécifié en second opérande (contraire de shl).
Shr avec les types signés
Note: contrairement à l'opérateur >> en langage C, l'opérateur shr est un décalage de bit logique (non arithmétique), même si l'opérande de gauche est un entier signé. Une conversion de type implicite et un extension vers un type non signé plus large peut être réalisée avant l'opération de décalage. Vérifiez ce que le programme suivant imprime réellement.
program ShrTest;
begin
WriteLn(ShortInt(-3) shr 1);
end.
Le bit est-il mis ?
function isBitSet(AValue, ABitNumber:integer):boolean;
begin
result:=odd(AValue shr ABitNumber);
end;