RosettaCodeData/Task/Binary-digits/SNUSP/binary-digits.snusp
2015-11-18 06:14:39 +00:00

5 lines
136 B
Text

/recurse\
$,binary!\@\>?!\@/<@\.#
! \=/ \=itoa=@@@+@+++++#
/<+>- \ div2
\?!#-?/+# mod2