View/Edit #7921:d2b

Name(s): d2b

1:  n = toint(args[1])
2:  largest = 1
3:  while (2 ^ largest <= n)
4:    largest = largest + 1
5:  endwhile
6:  total = ""
7:  for m in [1..largest]
8:    m = largest - m
9:    if (n >= 2 ^ m)
10:     n = n - 2 ^ m
11:     total = total + "1"
12:   else
13:     total = total + "0"
14:   endif
15: endfor
16: return total
17: "Last modified by Dax (#789) on Tue May  3 14:09:36 2005 MDT."

Verb arguments: none none none
Verb perms: Readable eXecutable NOT-Debug
Verb owned by: Catspaw (#7921)

You are not logged in.