Count in octal: Difference between revisions

Content added Content deleted
(Added PicoLisp)
(→‎Tcl: Added implementation)
Line 32: Line 32:
<lang PicoLisp>(for (N 0 T (inc N))
<lang PicoLisp>(for (N 0 T (inc N))
(prinl (oct N)) )</lang>
(prinl (oct N)) )</lang>

=={{header|Tcl}}==
<lang tcl>package require Tcl 8.5; # arbitrary precision integers; we can count until we run out of memory!
while 1 {
puts [format "%llo" [incr counter]]
}</lang>


=={{header|UNIX Shell}}==
=={{header|UNIX Shell}}==