for(m={V:4,X:9,L:49,C:99,D:499,M:999};$=readline(r=0);print(r))for(i in $)n=-~m[$[i]],r+=n<m[$[-~i]]?-n:n