a <- 1
n <- 0
repeat
{
  if (a == 0) break
  olda <- a
  a <- a/2
  n <- n + 1
}

print(n)
print(olda)