RosettaCodeData/Task/Binary-digits/J/binary-digits.j

8 lines
83 B
Plaintext

tobin=: '01'{~#:
tobin 5
101
tobin 50
110010
tobin 9000
10001100101000