6 lines
83 B
Text
6 lines
83 B
Text
|
let n = ref 1024;;
|
||
|
|
while !n > 0 do
|
||
|
|
Printf.printf "%d\n" !n;
|
||
|
|
n := !n / 2
|
||
|
|
done;;
|