1 line
69 B
Text
1 line
69 B
Text
set num 1024; while {$num > 0} {print $num; set num [expr $num \ 2]}
|
set num 1024; while {$num > 0} {print $num; set num [expr $num \ 2]}
|