RosettaCodeData/Task/Binary-digits/EasyLang/binary-digits.easy

9 lines
136 B
Plaintext

func$ bin num .
if num <= 1 : return num
return bin (num div 2) & num mod 2
.
print bin 0
print bin 5
print bin 50
print bin 9000