// Slower C++ solution:
#include <iostream>

#include <vector>

#include <deque>

#include <algorithm>

#include <numeric>

#include <string>

#include <cstring>

#include <list>

#include <unordered_set>

#include <tuple>

#include <cmath>

#include <limits>

#include <type_traits>

#include <iomanip>

#include <unordered_map>

using namespace std;



namespace {



	using lint = long long;

	using uli = unsigned long long;



	uli gcd(uli a, uli b) {

		while (1) {

			if (a < b) swap(a, b);

			if (!b) break;

			a %= b;

		}

		return a;

	}



	uli lcm(uli a, uli b)

	{

		return a / gcd(a, b) * b;

	}



	const uli mod = 1000000007;

	const double pi = 3.141592653589793238462;

	const lint intmax = 9223372036854775807;



	uli _PowMod(uli x, uli y, uli _mod)

	{

		if (y == 0)

		{

			return 1;

		}

		else if (y == 1)

		{

			return x % _mod;

		}

		else if (y % 2 == 0)

		{

			auto tmp = _PowMod(x, y / 2, _mod);

			return tmp * tmp % _mod;

		}

		else

		{

			auto tmp = _PowMod(x, y / 2, _mod);

			return (tmp * tmp % _mod) * x % _mod;

		}

	}





	uli PowMod(uli x, uli y)

	{

		return _PowMod(x, y, mod);

	}



	uli getModInv(uli N)

	{

		return PowMod(N, mod - 2);

	}



	lint nCrMod(lint start, lint n, lint r)

	{

		if (n < r)

		{

			return 0;

		}

		lint a = start;

		for (size_t i = n; i >= n - r + 1; i--)

		{

			a *= i;

			a %= mod;

		}

		for (size_t i = 1; i <= r; i++)

		{

			a *= getModInv(i);

			a %= mod;

		}

		return a;

	}



	lint nHrMod(lint start, lint n, lint r)

	{

		return nCrMod(start, n + r - 1, r);

	}



	lint _nCrMod(lint start, lint n, lint r)

	{

		if (n <= 0)

		{

			return 0;

		}

		return nCrMod(start, n, r);

	}



	struct uf

	{

		vector<lint> p;



		uf(lint n) : p(n)

		{

			for (size_t i = 0; i < n; i++)

			{

				p[i] = i;

			}

		}



		lint rt(lint n)

		{

			return p[n] == n ? n : p[n] = rt(p[n]);

		}



		void un(lint n, lint m)

		{

			p[rt(n)] = p[rt(m)];

		}



		bool eq(lint n, lint m)

		{

			return rt(n) == rt(m);

		}

	};



	bool lineCol(lint a1x, lint a1y, lint a2x, lint a2y, lint b1x, lint b1y, lint b2x, lint b2y)

	{

		auto ta = (b1x - b2x) * (a1y - b1y) + (b1y - b2y) * (b1x - a1x);

		auto tb = (b1x - b2x) * (a2y - b1y) + (b1y - b2y) * (b1x - a2x);

		auto tc = (a1x - a2x) * (b1y - a1y) + (a1y - a2y) * (a1x - b1x);

		auto td = (a1x - a2x) * (b2y - a1y) + (a1y - a2y) * (a1x - b2x);



		return tc * td < 0 && ta * tb < 0;

	}



	lint powInt(lint a, lint b)

	{

		if (b == 0)

		{

			return 1;

		}

		if (b == 1)

		{

			return a;

		}

		lint tmp = powInt(a, b / 2);

		return (b % 2 == 1 ? a * tmp * tmp : tmp * tmp);

	}



	lint _sMod(string n, lint mod)

	{

		lint k = (n[0] - '0') % mod;

		for (size_t i = 1; i < n.length(); i++)

		{

			k *= 10;

			k += (n[i] - '0');

			k %= mod;

		}

		return k;

	}



#define vec(name, n)			vector<lint> name(n)

#define vec_(name, n, init)		vector<lint> name(n, init)



#define vecs(name, n)			vector<string> name(n)

#define vect(t, name, n)		vector<t> name(n)



#define vec2(name, n, m)		vector<vector<lint>> name(n, vector<lint>(m))

#define vec2_(name, n, m, init)	vector<vector<lint>> name(n, vector<lint>(m, init))



#define rep(i,n)	for(lint i = 0; i < n; i++)

#define repi(i,n,z)	for(lint i = z; i < n; i++)

#define mmax(a,b)	max((lint)a, (lint)b)

#define mmin(a,b)	min((lint)a, (lint)b)



	template<typename T>

	void vsort(vector<T>& v)

	{

		sort(v.begin(), v.end());

	}



	template<typename T>

	void vsortr(vector<T>& v)

	{

		sort(v.rbegin(), v.rend());

	}



	lint div2(lint p, lint q)

	{

		return (p + q - 1) / q;

	}



	struct xy

	{

		lint x, y;

		xy() :x(0), y(0) {}

		xy(lint _x, lint _y) : x(_x), y(_y) {}

	};



	template<class It, class T>

	bool exist(It begin, It end, const T& val)

	{

		return find(begin, end, val) != end;

	}



	template<class It, class Pr>

	bool exist_if(It begin, It end, Pr pred)

	{

		return find_if(begin, end, pred) != end;

	}



	lint n_dig(lint n)

	{

		lint ans = 0;

		while (n > 0)

		{

			n /= 10;

			ans++;

		}

		return ans;

	}



	template<class T, class T2>

	T2 ler(T val1, T val2, T2 l, T2 e, T2 r)

	{

		if (val1 < val2)

			return r;

		if (val1 > val2)

			return l;

		return e;

	}



	const lint alpn = 'z' - 'a' + 1;



	template<class T>

	T sgn(T val)

	{

		if (val == T(0))

			return T(0);

		if (val < 0)

			return T(-1);

		if (val > 0)

			return T(1);

	}



	template<class T>

	bool between(T val, T l, T r)

	{

		return (val >= l) && (val <= r);

	}



#define all(v) v.begin(),v.end()

#define rall(v) v.rbegin(),v.rend()



	template<class It>

	vector<lint> carr(It begin, It end) {

		vec(c, 0);

		c.push_back(1);

		auto before = *begin;

		for (auto it = begin + 1; it != end; it++) {

			if (before != *it) {

				c.push_back(0);

				before = *it;

			}

			c.back()++;

		}

		return c;

	}



	template<class T>

	struct nval {

		lint n;

		T val;

		nval() : n(0) {};

		nval(lint _n, T _val) : n(_n), val(_val) {};

	};



	template<class It>

	auto carr2(It begin, It end) {

		using T = nval<remove_reference_t<decltype(*begin)>>;



		vect(T, c, 0);

		c.push_back(T(1, *begin));

		auto before = *begin;

		for (auto it = begin + 1; it != end; it++) {

			if (before != *it) {

				c.push_back(T(0, *it));

				before = *it;

			}

			c.back().n++;

		}

		return c;

	}



	lint sumdig(lint n) {

		lint ans = 0;

		while (n > 0) {

			ans += n % 10;

			n /= 10;

		}

		return ans;

	}



	lint getdig(lint n, lint d) {

		return (n / powInt(10, d)) % 10;

	}



	template<typename It, typename T>

	void sort2(It begin, It end, T It::value_type::* p)

	{

		using val_t = remove_reference_t<decltype(*begin)>;



		sort(begin, end, [p](val_t a, val_t b) {return a.*p < b.*p; });

	}



	template<typename It, typename T, typename T2>

	void sort3(It begin, It end, T It::value_type::* p, T2 It::value_type::* p2)

	{

		using val_t = remove_reference_t<decltype(*begin)>;



		sort(begin, end, [p, p2](val_t a, val_t b) {

			if (a.*p != b.*p) { return  a.*p < b.*p; }

			else { return a.*p2 > b.*p2; }

			});

	}



}





vec2(tr, 200010, 0);

vec_(c, 200010,0);

vec_(ans, 200010, -1);



void grt(lint s, lint pos) {

	ans[pos] = s + c[pos];



	rep(i, tr[pos].size()) {

		auto child = tr[pos][i];

		if (ans[child] == -1) {

			grt(ans[pos], child);

		}

	}

}



int main()

{

	string s;

	cin >> s;



	lint p = count(all(s), '+');

	lint m = count(all(s), '-');



	cout << p - m << endl;

	return 0;

}


// Faster C++ solution for the same problem (measured speedup: 10.25858849383953x):
#include <iostream>

#include <vector>

#include <deque>

#include <algorithm>

#include <numeric>

#include <string>

#include <cstring>

#include <list>

#include <unordered_set>

#include <tuple>

#include <cmath>

#include <limits>

#include <type_traits>

#include <iomanip>

#include <unordered_map>

#include <queue>

#include <stack>

#include <set>

#include <bitset>

#include <regex>

using namespace std;



#define rep(i,n)	for(lint i = 0; i < n; i++)

#define repr(i,n)	for(lint i = n - 1; i >= 0; i--)

#define repi(i,ini,n)	for(lint i = ini; i < n; i++)

#define repir(i,ini,n)	for(lint i = n-1; i >= ini; i--)

#define repb(i,start,end)	for(lint i = start; i <= end; i++)

#define repbr(i,start,end)	for(lint i = end; i >= start; i--)



#define bit(n)				(1LL << n)

#define brep(i, n)			rep(i, bit(n))

#define brepi(i, ini, n)	repi(i, ini, bit(n))



//#define sz(v)	(lint)(v.size())



#define all(v) v.begin(),v.end()

#define rall(v) v.rbegin(),v.rend()

#define rg(v, n) v.begin(), v.begin()+n

#define rrg(v, n) v.rbegin(), v.rbegin()+n



#define ret return 0;



namespace {



	using lint = long long;

	using ulint = unsigned long long;

	using ld = long double;

	struct xy

	{

		lint x, y;

		xy() :x(0), y(0) {}

		xy(lint _x, lint _y) : x(_x), y(_y) {}

		xy operator+(const xy& p) const

		{

			return xy(x + p.x, y + p.y);

		}

		bool operator<(xy p) const

		{

			if (y == p.y)

				return x < p.x;

			return y < p.y;

		}

	};

	struct xyd

	{

		ld x, y;

		xyd() :x(0), y(0) {}

		xyd(long double _x, long double _y) : x(_x), y(_y) {}

	};

	using vec = vector<lint>;

	using vecd = vector<ld>;

	using vecs = vector<string>;

	using vecp = vector<xy>;

	template<class T> using vect = vector<T>;

	class vec2 : public vector<vector<lint>>

	{

	public:

		vec2() {}

		vec2(lint n) : vector(n) {}

		vec2(lint h, lint w) : vector(h, vector<lint>(w)) {}

		vec2(lint h, lint w, lint v) : vector(h, vector<lint>(w, v)) {}

	};



	template<class T> using priq = priority_queue<T>;

	template<class T> using rpriq = priority_queue<T, vector<T>, greater<T>>;



	const ulint mod = 1000000007;

	//const ulint mod = 998244353;

	const double pi = 3.141592653589793238462;

	const lint intmax = 9223372036854775807;

	const lint inf = 1100100100100100100LL;

	const ld eps = 0.0000001;

	const lint alpn = 'z' - 'a' + 1;



	template<class T>

	constexpr auto msum(T arg0)

	{

		return arg0;

	}



	template<class T, class ...Types>

	constexpr auto msum(T arg0, Types ...args)

	{

		static_assert(sizeof...(args) > 0, "arg err");



		return arg0 + msum(args...);

	}



	template<class It>

	constexpr typename It::value_type mmax(It begin, It end)

	{

		return *max_element(begin, end);

	}



	template<class It>

	constexpr typename It::value_type mmin(It begin, It end)

	{

		return *min_element(begin, end);

	}



	template<class T>

	constexpr auto mmax(T arg)

	{

		return arg;

	}



	template<class T, class ...Types>

	constexpr auto mmax(T arg0, Types ...args)

	{

		using promote_t = decltype(msum(arg0, args...));



		return max(static_cast<promote_t>(arg0), static_cast<promote_t>(mmax(args...)));

	}



	template<class T>

	constexpr auto mmin(T arg)

	{

		return arg;

	}



	template<class T, class ...Types>

	constexpr auto mmin(T arg0, Types ...args)

	{

		using promote_t = decltype(msum(arg0, args...));



		return min(static_cast<promote_t>(arg0), static_cast<promote_t>(mmin(args...)));

	}



	template<class T>

	struct Mplus

	{

		T operator()(const T& a, const T& b)

		{

			return a + b;

		}



		const static T id = T(0);

	};



	template<

		class It,

		class T = typename It::value_type,

		class Monoid = Mplus<T>>

		T acc(It begin, It end, Monoid f = Mplus<T>())

	{

		return accumulate(begin, end, Monoid::id, f);

	}



	constexpr auto clamp(lint val, lint left, lint right)

	{

		return mmax(mmin(val, right), left);

	}



	constexpr lint div2(lint p, lint q)

	{

		return (p + q - 1) / q;

	}



#if(__cplusplus < 201703L)



	lint gcd(lint a, lint b) {

		while (1) {

			if (a < b) swap(a, b);

			if (!b) break;

			a %= b;

		}

		return a;

	}



	lint lcm(lint a, lint b)

	{

		return a / gcd(a, b) * b;

	}



#endif



	lint powInt(lint a, lint b)

	{

		if (b == 0)

		{

			return 1;

		}

		if (b == 1)

		{

			return a;

		}

		lint tmp = powInt(a, b / 2);

		return (b % 2 == 1 ? a * tmp * tmp : tmp * tmp);

	}



	template<class T>

	T sgn(T val)

	{

		if (val == T(0))

			return T(0);

		if (val < 0)

			return T(-1);

		if (val > 0)

			return T(1);

	}



	template<class T>

	constexpr auto modK_belowN(T k, T MOD, T n)

	{

		return (n + MOD - k - 1) / MOD;

	}



	template<class It, class T>

	bool exist(It begin, It end, const T& val)

	{

		return find(begin, end, val) != end;

	}



	template<class It, class Pr>

	bool exist_if(It begin, It end, Pr pred)

	{

		return find_if(begin, end, pred) != end;

	}



	template<class T>

	bool between(T val, T l, T r)

	{

		return (val >= l) && (val <= r);

	}



	template<class It>

	auto carr(It begin, It end) {

		vec c;

		c.push_back(1);

		auto before = *begin;

		for (auto it = begin + 1; it != end; it++) {

			if (before != *it) {

				c.push_back(0);

				before = *it;

			}

			c.back()++;

		}

		return c;

	}



	template<class T>

	struct nval {

		lint n;

		T val;

		nval() : n(0) {};

		nval(lint _n, T _val) : n(_n), val(_val) {};

	};



	template<class It>

	auto carr2(It begin, It end) {

		using T = nval<remove_reference_t<decltype(*begin)>>;



		vect<T> c;

		c.push_back(T(1, *begin));

		auto before = *begin;

		for (auto it = begin + 1; it != end; it++) {

			if (before != *it) {

				c.push_back(T(0, *it));

				before = *it;

			}

			c.back().n++;

		}

		return c;

	}



	template<class It, class ...T>

	void sort2(It begin, It end, T ...p)

	{

		using val_t = remove_reference_t<decltype(*begin)>;



		sort(begin, end, [p...](val_t a, val_t b) {

			bool neq[] = { (a.*p != b.*p)... };

			bool sg[] = { (a.*p < b.*p)... };



			rep(i, sizeof...(p)) {

				if (neq[i])

				{

					return sg[i];

				}

			}

			return false;

		});

	}



	template<size_t _K, size_t _N, class ...Types, size_t ...indices>

	auto constexpr __ModKtuple_Impl(index_sequence<indices...>, tuple<Types...> args)

	{

		return make_tuple(get<indices* _N + _K>(args)...);

	}



	template<size_t K, size_t N, class ...Types>

	auto constexpr ModKtuple(Types ...args)

	{

		return __ModKtuple_Impl<K, N>(make_index_sequence<modK_belowN(K, N, sizeof...(args))>{}, forward_as_tuple(args...));

	}



	template<class It, class ...T, class ...Tsg, size_t ...indices>

	void __sort3_Impl(It begin, It end, tuple<T...> p, tuple<Tsg...> sgf, index_sequence<indices...>)

	{

		using val_t = remove_reference_t<decltype(*begin)>;



		sort(begin, end, [p, sgf](val_t a, val_t b) {

			bool neq[] = { (a.*(get<indices>(p)) != b.*(get<indices>(p)))... };

			bool sg[] = { ((a.*(get<indices>(p)) < b.*(get<indices>(p))) != (get<indices>(sgf))) ... };



			rep(i, sizeof...(indices)) {

				if (neq[i])

				{

					return sg[i];

				}

			}

			return false;

			});

	}



	template<class It, class ...T>

	void sort3(It begin, It end, T ...p)

	{

		using val_t = remove_reference_t<decltype(*begin)>;



		auto p_forward = ModKtuple<0, 2>(p...);

		auto sgf_forward = ModKtuple<1, 2>(p...);



		constexpr auto p_sz = tuple_size<decltype(p_forward)>::value;

		constexpr auto sgf_sz = tuple_size<decltype(sgf_forward)>::value;



		static_assert(p_sz == sgf_sz, "arg err");



		__sort3_Impl(begin, end, p_forward, sgf_forward, make_index_sequence<p_sz>{});

	}



	template<class It, class It2>

	auto spacel(It i, It2 end)

	{

		if (i + 1 == end)

		{

			return '\n';

		}

		else

		{

			return ' ';

		}

	}



	template<class It>

	bool next_comb(lint n, It begin, It end)

	{

		auto rend = make_reverse_iterator(begin);

		auto rbegin = make_reverse_iterator(end);



		auto rit = rbegin;

		for (; rit != rend; rit++)

		{

			if ((rit == rbegin && (*rit) + 1 != n) ||

				(rit != rbegin && (*rit) + 1 != *(rit - 1)))

			{

				goto found;

			}

		}

		return false;

	found:;

		(*rit)++;



		for (auto it = rit.base(); it != end; it++)

		{

			(*it) = (*(it - 1)) + 1;

		}

		return true;

	}



	ostream& setp(ostream& ost)

	{

		cout << setprecision(60) << fixed;

		return ost;

	}



#ifdef _LOCAL

	auto& dbg = cout;

#else

	struct dummy_cout

	{

		template<class T>

		dummy_cout& operator<<(T&& op)

		{

			return *this;

		}



		using endl_t = basic_ostream<char, char_traits<char>>;



		dummy_cout& operator<<(endl_t& (*)(endl_t&))

		{

			return *this;

		}

	};



	dummy_cout dbg;

#endif

};



int main()

{

	string s;

	cin >> s;



	cout << lint(count(all(s), '+')) - (lint)count(all(s), '-') << endl;



	return 0;

}