4 lines
68 B
ObjectPascal
4 lines
68 B
ObjectPascal
|
begin
|
|||
|
|
assert(1bi shl 2 = 4bi);
|
|||
|
|
assert(10bi shr 2 = 2bi);
|
|||
|
|
end.
|