5 lines
72 B
Text
5 lines
72 B
Text
Dim x = 1024
|
|
Do
|
|
Console.WriteLine(x)
|
|
x = x \ 2
|
|
Loop While x > 0
|