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