local s = io.read()
local t = {}
local ret = 0
local cur = 0
for i = 1, #s do
  local ss = s:sub(i, i) == "0"
  if ss then
    if cur < 0 then
      cur = cur + 1
      ret = ret + 1
    else
      cur = cur + 1
    end
  else
    if 0 < cur then
      cur = cur - 1
      ret = ret + 1
    else
      cur = cur - 1
    end
  end
end
print(ret * 2)
