RosettaCodeData/Task/Negative-base-numbers/Mathematica/negative-base-numbers-2.math
2023-07-01 13:44:08 -04:00

2 lines
139 B
Text

DecodeBase[ToCharacterCode[$Version], -126](*ascii 1-byte encoding*)
DecodeBase[ToCharacterCode[$Version], -(2^16 - 1)](*2-byte encoding*)