func$ bin num .
b$ = ""
while num > 1
b$ = num mod 2 & b$
num = num div 2
.
return num & b$
print bin 5
print bin 50
print bin 9000