Be concise.
Be useful.
All contributions dictatorially edited by webmasters to match personal tastes.
Please do not paste any copyright violating material.
Please try to avoid dependencies to third-party libraries and frameworks.
String s = Convert.ToString(x,2).PadLeft(16, '0');
String s = Convert.ToString(x,2);
var s = x.toRadixString(2);
Integer.digits(x, 2) |> Enum.join("")
s = Integer.to_string(x, 2)
S = io_lib:format("~.2B~n", [X]).
write (unit=s,fmt='(B32)') x
write (unit=s,fmt='(B0)') x
let s = x.toString(2);
String s = Integer.toBinaryString(x);
local s = {}
while x > 0 do
local tmp = math.fmod(x,2)
s[#s+1] = tmp
x=(x-tmp)/2
end
s=table.concat(s)
$s = sprintf("%b", $x);
var Iter,n:integer;
[...]
S := '';
for Iter := 0 to n do
s:= Char(Ord('0')+(x shr Iter) and 1) + S;
$s = sprintf "%b", $x;
s = '{:b}'.format(x)
s = x.to_s(2)
let s = format!("{x:b}");
let s = format!("{:b}", x);
val s = x.toString(2)
(define (binary-representation x)
(let loop ([N x]
[s '()])
(let ([NN (arithmetic-shift N -1)])
(cond [(zero? N) (list->string s)]
[(odd? N) (loop NN (cons #\1 s))]
[else (loop NN (cons #\0 s))]))))