program main
	implicit none
	character(4) S
	integer counter, i
	read(*, *) S
	counter = 0
	do i = 1, 4
		if(S(i:i) == '+') then
			counter = counter + 1
		else
			counter = counter - 1
		end if
	end do
	write(*, *) counter
end program main