let () =
  let n = read_int () in
  let rec doit i s =
    if i = 0 then s
    else
      let x = i / 2 in
      doit x (s + x) in
  let s = doit n n in
  Printf.printf "%d\n" (2*n - s)