#include <bits/stdc++.h>
using namespace std;
long long fastpow(long long angka, long long pangkat, long long MOD) {
  long long res = 1;
  while (pangkat) {
    if (pangkat & 1) res = (res * angka) % MOD;
    angka = (angka * angka) % MOD;
    pangkat = pangkat >> 1;
  }
  return res;
}
long long fastpow(long long angka, long long pangkat) {
  long long res = 1;
  while (pangkat) {
    if (pangkat & 1) res = (res * angka);
    angka = (angka * angka);
    pangkat = pangkat >> 1;
  }
  return res;
}
long long gcd(long long angka1, long long angka2) {
  while (angka2) {
    swap(angka1, angka2);
    angka2 = angka2 % angka1;
  }
  return angka1;
}
long long lcm(long long angka1, long long angka2) {
  return (angka1 / gcd(angka1, angka2)) * angka2;
}
unordered_map<int, int> parent;
int getParent(int x) {
  if (parent[x] == -1) return parent[x] = x;
  if (parent[x] == x) return x;
  return parent[x] = getParent(parent[x]);
}
string print_biner(int n) {
  vector<bool> biner;
  while (n > 0) {
    biner.push_back(n & 1);
    n = n / 2;
  }
  reverse(biner.begin(), biner.end());
  char ret[100];
  for (int i = 0; i < biner.size(); i++) ret[i] = (int)biner[i] + '0';
  ret[biner.size()] = '\0';
  string s(ret);
  return s;
}
void solve_bruteforce(int n) {
  parent.clear();
  priority_queue<pair<int, pair<int, int>>> pq;
  for (int i = 0; i < n; i++) {
    parent[i] = -1;
    for (int j = 0; j < n; j++) {
      pq.push(make_pair((i ^ j) * -1, make_pair(i, j)));
    }
  }
  long long res = 0;
  while (!pq.empty()) {
    int cost = pq.top().first * -1;
    int a = pq.top().second.first;
    int b = pq.top().second.second;
    pq.pop();
    if (getParent(a) != getParent(b)) {
      res += cost;
      parent[getParent(a)] = getParent(b);
    }
  }
  cout << n << " : " << res << "\t\t" << print_biner(n)
       << "\t: " << print_biner(res) << "\n";
}
long long ff(long long n) {
  if ((n & (n - 1)) != 0) return 1 << 31;
  long long res = 0;
  long long k = 1;
  while (n > 1) {
    n = n / 2;
    res += n * k;
    k = k << 1;
  }
  return res;
}
long long f(long long n) {
  if (n == 0) return 0;
  if ((n & (n - 1)) == 0) {
    return ff(n);
  }
  long long a, b;
  a = 1;
  while (true) {
    b = n - a;
    if (b < a) {
      break;
    }
    a = a << 1;
  }
  return a + f(a) + f(b);
}
void solve(long long n) { cout << f(n) << "\n"; }
int main() {
  ios_base::sync_with_stdio(false);
  cin.tie(NULL);
  cout.tie(NULL);
  ;
  long long n;
  cin >> n;
  solve(n);
  return 0;
}
