Binary digits: Difference between revisions

Content deleted Content added
Peak (talk | contribs)
Simpler Tcl version
Line 4,707:
10001100101000
</pre>
<br>
Or you can use the builtin format:
<lang tcl>foreach n {0 1 5 50 9000} {
puts [format "%4u: %b" $n $n]
}</lang>
{{out}}
<pre> 0: 0
1: 1
5: 101
50: 110010
9000: 10001100101000</pre>
 
=={{header|TI-83 BASIC}}==