Set right-adjacent bits: Difference between revisions
m
→{{header|Raku}}: Throw in another test to more fully mimic the task examples
Thundergnat (talk | contribs) (→{{header|Raku}}: Add a Raku example) |
Thundergnat (talk | contribs) m (→{{header|Raku}}: Throw in another test to more fully mimic the task examples) |
||
Line 239:
# Test with a few integers.
for 8,
say "\nInteger: $integer - Right-adjacent-bits: up to $bits";
Line 252:
1110
1111
Integer: 18455760086304825618 - Right-adjacent-bits: up to 5
10000000000100000000010000000010000000100000010000010000100010010
11000000000110000000011000000011000000110000011000011000110011011
11100000000111000000011100000011100000111000011100011100111011111
11110000000111100000011110000011110000111100011110011110111111111
11111000000111110000011111000011111000111110011111011111111111111
Integer: 5444684034376312377319904082902529876242 - Right-adjacent-bits: up to 15
|