sub v {
  ord($_[0]) - ord('A');
}

print v('I')*26 + v('V'), "\n";