main = do
  li <- getLine
  let [w,a,b] = map read $ words li
  let ans = compute w a b
  print ans

compute :: Int -> Int -> Int -> Int
compute w a b
  | a+w < b = b - a - w
  | b+w < a = a - b - w
  | True    = 0