7 lines
69 B
Text
7 lines
69 B
Text
|
Dim n As Integer
|
||
|
|
n = 1024
|
||
|
|
While n > 0
|
||
|
|
Print n
|
||
|
|
n = n \ 2
|
||
|
|
Wend
|