Series[1 - Log[1 + Sqrt[1 - x]], {x, a, 4}]