@adrian5213 Not sure what you mean by a "binary number" (a string of 0's and 1's? a sequence? a list?). If you are OK with a list of 0's and 1's then the following works.
ListTools:-Reverse(n): #reverse order since Bits package works in lsb first order
Bits:-Join(%): #convert to internal (integer) format
[Bits:-GetBits(-%,-1..0,bits=8)]: #take the negative and convert back to a list
subsop(1=0,%); #force the first bit to zero
[0, 0, 1, 0, 0, 1, 1, 1]
I assumed the input had first bit 1, but you would probably want to check.
This of course gets Maple to do the work. If you want to do it "by hand", then you could just construct the usual algorithm with list entries.