RosettaCodeData/Task/Binary-digits/MiniScript/binary-digits-2.mini
2023-07-01 13:44:08 -04:00

12 lines
270 B
Text

binary = function(n,result="")
if n == 0 then
if result == "" then return "0" else return result
end if
result = str(n%2) + result
return binary(floor(n/2),result)
end function
print binary(5)
print binary(50)
print binary(9000)
print binary(0)