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