var i := 1024
while (i > 0):
    traceln(i)
    i //= 2