#define NULL ((void *)0)
typedef unsigned long size_t; // Customize by platform.
typedef long intptr_t;
typedef unsigned long uintptr_t;
typedef long scalar_t__; // Either arithmetic or pointer type.
/* By default, we understand bool (as a convenience). */
typedef int bool;
#define false 0
#define true 1

/* Forward declarations */

/* Type definitions */

/* Variables and functions */
int /*<<< orphan*/ fgets(char *, int, int /*<<< orphan*/);
int /*<<< orphan*/ printf(char *, int);
int /*<<< orphan*/ stdin;
int strlen(char *);
int main() {
  char s[100];
  int n[100], i, out = 0;
  for (i = 0; i < 100; i++) {
    n[i] = 0;
  }
  fgets(s, 100, stdin);
  for (i = 0; i < strlen(s); i++) {
    switch (s[i]) {
    case 'X':
      n[i] = 10;
      break;
    case 'V':
      n[i] = 5;
      break;
    case 'L':
      n[i] = 50;
      break;
    case 'C':
      n[i] = 100;
      break;
    case 'I':
      n[i] = 1;
      break;
    }
    if (i > 0 && n[i] > n[i - 1]) {
      n[i - 1] = n[i] - n[i - 1];
      n[i] = 0;
    }
  }
  for (i = 0; i < strlen(s); i++) {
    out = out + n[i];
  }
  printf("%d", out);
  return 0;
}


x86 assembly (clang, -O0):
<main>:
push   %rbp
mov    %rsp,%rbp
sub    $0x220,%rsp
movl   $0x0,-0x4(%rbp)
movl   $0x0,-0x208(%rbp)
movl   $0x0,-0x204(%rbp)
cmpl   $0x64,-0x204(%rbp)
jge    1189 <main+0x59>
movslq -0x204(%rbp),%rax
movl   $0x0,-0x200(%rbp,%rax,4)
mov    -0x204(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x204(%rbp)
jmp    1156 <main+0x26>
lea    -0x70(%rbp),%rdi
mov    0x2e54(%rip),%rax
mov    (%rax),%edx
mov    $0x64,%esi
call   1050 <fgets@plt>
movl   $0x0,-0x204(%rbp)
mov    -0x204(%rbp),%eax
mov    %eax,-0x20c(%rbp)
lea    -0x70(%rbp),%rdi
call   1030 <strlen@plt>
mov    %eax,%ecx
mov    -0x20c(%rbp),%eax
cmp    %ecx,%eax
jge    1306 <main+0x1d6>
movslq -0x204(%rbp),%rax
movsbl -0x70(%rbp,%rax,1),%eax
add    $0xffffffbd,%eax
mov    %eax,%ecx
mov    %rcx,-0x218(%rbp)
sub    $0x15,%eax
ja     1275 <main+0x145>
mov    -0x218(%rbp),%rax
lea    0xe02(%rip),%rcx
movslq (%rcx,%rax,4),%rax
add    %rcx,%rax
jmp    *%rax
movslq -0x204(%rbp),%rax
movl   $0xa,-0x200(%rbp,%rax,4)
jmp    1275 <main+0x145>
movslq -0x204(%rbp),%rax
movl   $0x5,-0x200(%rbp,%rax,4)
jmp    1275 <main+0x145>
movslq -0x204(%rbp),%rax
movl   $0x32,-0x200(%rbp,%rax,4)
jmp    1275 <main+0x145>
movslq -0x204(%rbp),%rax
movl   $0x64,-0x200(%rbp,%rax,4)
jmp    1275 <main+0x145>
movslq -0x204(%rbp),%rax
movl   $0x1,-0x200(%rbp,%rax,4)
cmpl   $0x0,-0x204(%rbp)
jle    12ed <main+0x1bd>
movslq -0x204(%rbp),%rax
mov    -0x200(%rbp,%rax,4),%eax
mov    -0x204(%rbp),%ecx
sub    $0x1,%ecx
movslq %ecx,%rcx
cmp    -0x200(%rbp,%rcx,4),%eax
jle    12ed <main+0x1bd>
movslq -0x204(%rbp),%rax
mov    -0x200(%rbp,%rax,4),%ecx
mov    -0x204(%rbp),%eax
sub    $0x1,%eax
cltq
sub    -0x200(%rbp,%rax,4),%ecx
mov    -0x204(%rbp),%eax
sub    $0x1,%eax
cltq
mov    %ecx,-0x200(%rbp,%rax,4)
movslq -0x204(%rbp),%rax
movl   $0x0,-0x200(%rbp,%rax,4)
jmp    12f2 <main+0x1c2>
mov    -0x204(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x204(%rbp)
jmp    11aa <main+0x7a>
movl   $0x0,-0x204(%rbp)
mov    -0x204(%rbp),%eax
mov    %eax,-0x21c(%rbp)
lea    -0x70(%rbp),%rdi
call   1030 <strlen@plt>
mov    %eax,%ecx
mov    -0x21c(%rbp),%eax
cmp    %ecx,%eax
jge    1363 <main+0x233>
mov    -0x208(%rbp),%eax
movslq -0x204(%rbp),%rcx
add    -0x200(%rbp,%rcx,4),%eax
mov    %eax,-0x208(%rbp)
mov    -0x204(%rbp),%eax
add    $0x1,%eax
mov    %eax,-0x204(%rbp)
jmp    1310 <main+0x1e0>
mov    -0x208(%rbp),%esi
lea    0xce8(%rip),%rdi
call   1040 <printf@plt>
xor    %eax,%eax
add    $0x220,%rsp
pop    %rbp
ret

x86 assembly (clang, -O2):
<main>:
push   %rbp
push   %r15
push   %r14
push   %rbx
sub    $0x208,%rsp
lea    0x70(%rsp),%rdi
xor    %ebp,%ebp
mov    $0x190,%edx
xor    %esi,%esi
call   1050 <memset@plt>
mov    0x2e81(%rip),%rax
mov    (%rax),%edx
mov    %rsp,%r14
mov    %r14,%rdi
mov    $0x64,%esi
call   1060 <fgets@plt>
mov    %r14,%rdi
call   1030 <strlen@plt>
test   %eax,%eax
jle    126c <main+0x12c>
movsbl (%rsp),%eax
add    $0xffffffbd,%eax
cmp    $0x15,%eax
ja     11d5 <main+0x95>
lea    0xe64(%rip),%rcx
movslq (%rcx,%rax,4),%rax
add    %rcx,%rax
jmp    *%rax
movl   $0x64,0x70(%rsp)
jmp    11d5 <main+0x95>
movl   $0x1,0x70(%rsp)
jmp    11d5 <main+0x95>
movl   $0x32,0x70(%rsp)
jmp    11d5 <main+0x95>
movl   $0x5,0x70(%rsp)
jmp    11d5 <main+0x95>
movl   $0xa,0x70(%rsp)
mov    %rsp,%rdi
call   1030 <strlen@plt>
cmp    $0x2,%eax
jl     126c <main+0x12c>
mov    $0x1,%ebx
mov    %rsp,%r14
lea    0xe63(%rip),%r15
jmp    1213 <main+0xd3>
nopw   0x0(%rax,%rax,1)
add    $0x1,%rbx
mov    %r14,%rdi
call   1030 <strlen@plt>
cltq
cmp    %rax,%rbx
jge    126c <main+0x12c>
movsbl (%rsp,%rbx,1),%ecx
add    $0xffffffbd,%ecx
cmp    $0x15,%ecx
ja     1254 <main+0x114>
mov    $0xa,%eax
movslq (%r15,%rcx,4),%rcx
add    %r15,%rcx
jmp    *%rcx
mov    $0x64,%eax
jmp    1250 <main+0x110>
mov    $0x1,%eax
jmp    1250 <main+0x110>
mov    $0x32,%eax
jmp    1250 <main+0x110>
mov    $0x5,%eax
nopw   0x0(%rax,%rax,1)
mov    %eax,0x70(%rsp,%rbx,4)
mov    0x70(%rsp,%rbx,4),%eax
sub    0x6c(%rsp,%rbx,4),%eax
jle    1200 <main+0xc0>
mov    %eax,0x6c(%rsp,%rbx,4)
movl   $0x0,0x70(%rsp,%rbx,4)
jmp    1200 <main+0xc0>
mov    %rsp,%rdi
call   1030 <strlen@plt>
test   %eax,%eax
jle    1297 <main+0x157>
xor    %ebx,%ebx
mov    %rsp,%r14
xor    %ebp,%ebp
nop
add    0x70(%rsp,%rbx,4),%ebp
add    $0x1,%rbx
mov    %r14,%rdi
call   1030 <strlen@plt>
cltq
cmp    %rax,%rbx
jl     1280 <main+0x140>
lea    0xe12(%rip),%rdi
mov    %ebp,%esi
call   1040 <printf@plt>
xor    %eax,%eax
add    $0x208,%rsp
pop    %rbx
pop    %r14
pop    %r15
pop    %rbp
ret

LLVM IR (-O0):
@stdin = global i32 0
@.str = [3 x i8] c"%d\00"
define i32 @main() {
%1 = alloca i32
%2 = alloca [100 x i8]
%3 = alloca [100 x i32]
%4 = alloca i32
%5 = alloca i32
store i32 0, i32* %1
store i32 0, i32* %5
store i32 0, i32* %4
br label %6
6: ; preds = %13, %0
%7 = load i32, i32* %4
%8 = icmp slt i32 %7, 100
br i1 %8, label %9, label %16
9: ; preds = %6
%10 = load i32, i32* %4
%11 = sext i32 %10 to i64
%12 = getelementptr inbounds [100 x i32], [100 x i32]* %3, i64 0, i64 %11
store i32 0, i32* %12
br label %13
13: ; preds = %9
%14 = load i32, i32* %4
%15 = add nsw i32 %14, 1
store i32 %15, i32* %4
br label %6
16: ; preds = %6
%17 = getelementptr inbounds [100 x i8], [100 x i8]* %2, i64 0, i64 0
%18 = load i32, i32* @stdin
%19 = call i32 @fgets(i8* %17, i32 100, i32 %18)
store i32 0, i32* %4
br label %20
20: ; preds = %84, %16
%21 = load i32, i32* %4
%22 = getelementptr inbounds [100 x i8], [100 x i8]* %2, i64 0, i64 0
%23 = call i32 @strlen(i8* %22)
%24 = icmp slt i32 %21, %23
br i1 %24, label %25, label %87
25: ; preds = %20
%26 = load i32, i32* %4
%27 = sext i32 %26 to i64
%28 = getelementptr inbounds [100 x i8], [100 x i8]* %2, i64 0, i64 %27
%29 = load i8, i8* %28
%30 = sext i8 %29 to i32
switch i32 %30, label %51 [
i32 88, label %31
i32 86, label %35
i32 76, label %39
i32 67, label %43
i32 73, label %47
]
31: ; preds = %25
%32 = load i32, i32* %4
%33 = sext i32 %32 to i64
%34 = getelementptr inbounds [100 x i32], [100 x i32]* %3, i64 0, i64 %33
store i32 10, i32* %34
br label %51
35: ; preds = %25
%36 = load i32, i32* %4
%37 = sext i32 %36 to i64
%38 = getelementptr inbounds [100 x i32], [100 x i32]* %3, i64 0, i64 %37
store i32 5, i32* %38
br label %51
39: ; preds = %25
%40 = load i32, i32* %4
%41 = sext i32 %40 to i64
%42 = getelementptr inbounds [100 x i32], [100 x i32]* %3, i64 0, i64 %41
store i32 50, i32* %42
br label %51
43: ; preds = %25
%44 = load i32, i32* %4
%45 = sext i32 %44 to i64
%46 = getelementptr inbounds [100 x i32], [100 x i32]* %3, i64 0, i64 %45
store i32 100, i32* %46
br label %51
47: ; preds = %25
%48 = load i32, i32* %4
%49 = sext i32 %48 to i64
%50 = getelementptr inbounds [100 x i32], [100 x i32]* %3, i64 0, i64 %49
store i32 1, i32* %50
br label %51
51: ; preds = %25, %47, %43, %39, %35, %31
%52 = load i32, i32* %4
%53 = icmp sgt i32 %52, 0
br i1 %53, label %54, label %83
54: ; preds = %51
%55 = load i32, i32* %4
%56 = sext i32 %55 to i64
%57 = getelementptr inbounds [100 x i32], [100 x i32]* %3, i64 0, i64 %56
%58 = load i32, i32* %57
%59 = load i32, i32* %4
%60 = sub nsw i32 %59, 1
%61 = sext i32 %60 to i64
%62 = getelementptr inbounds [100 x i32], [100 x i32]* %3, i64 0, i64 %61
%63 = load i32, i32* %62
%64 = icmp sgt i32 %58, %63
br i1 %64, label %65, label %83
65: ; preds = %54
%66 = load i32, i32* %4
%67 = sext i32 %66 to i64
%68 = getelementptr inbounds [100 x i32], [100 x i32]* %3, i64 0, i64 %67
%69 = load i32, i32* %68
%70 = load i32, i32* %4
%71 = sub nsw i32 %70, 1
%72 = sext i32 %71 to i64
%73 = getelementptr inbounds [100 x i32], [100 x i32]* %3, i64 0, i64 %72
%74 = load i32, i32* %73
%75 = sub nsw i32 %69, %74
%76 = load i32, i32* %4
%77 = sub nsw i32 %76, 1
%78 = sext i32 %77 to i64
%79 = getelementptr inbounds [100 x i32], [100 x i32]* %3, i64 0, i64 %78
store i32 %75, i32* %79
%80 = load i32, i32* %4
%81 = sext i32 %80 to i64
%82 = getelementptr inbounds [100 x i32], [100 x i32]* %3, i64 0, i64 %81
store i32 0, i32* %82
br label %83
83: ; preds = %65, %54, %51
br label %84
84: ; preds = %83
%85 = load i32, i32* %4
%86 = add nsw i32 %85, 1
store i32 %86, i32* %4
br label %20
87: ; preds = %20
store i32 0, i32* %4
br label %88
88: ; preds = %100, %87
%89 = load i32, i32* %4
%90 = getelementptr inbounds [100 x i8], [100 x i8]* %2, i64 0, i64 0
%91 = call i32 @strlen(i8* %90)
%92 = icmp slt i32 %89, %91
br i1 %92, label %93, label %103
93: ; preds = %88
%94 = load i32, i32* %5
%95 = load i32, i32* %4
%96 = sext i32 %95 to i64
%97 = getelementptr inbounds [100 x i32], [100 x i32]* %3, i64 0, i64 %96
%98 = load i32, i32* %97
%99 = add nsw i32 %94, %98
store i32 %99, i32* %5
br label %100
100: ; preds = %93
%101 = load i32, i32* %4
%102 = add nsw i32 %101, 1
store i32 %102, i32* %4
br label %88
103: ; preds = %88
%104 = load i32, i32* %5
%105 = call i32 @printf(i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str, i64 0, i64 0), i32 %104)
ret i32 0
}

LLVM IR (-O2):
@stdin = global i32 0
@.str = [3 x i8] c"%d\00"
define i32 @main() {
%1 = alloca [100 x i8]
%2 = alloca [100 x i32]
%3 = bitcast [100 x i32]* %2 to i8*
%4 = getelementptr inbounds [100 x i8], [100 x i8]* %1, i64 0, i64 0
%5 = load i32, i32* @stdin
%6 = call i32 @fgets(i8* %4, i32 100, i32 %5)
%7 = call i32 @strlen(i8* %4)
%8 = icmp sgt i32 %7, 0
br i1 %8, label %9, label %25
9: ; preds = %0
%10 = load i8, i8* %4
%11 = sext i8 %10 to i32
switch i32 %11, label %22 [
i32 88, label %20
i32 86, label %18
i32 76, label %16
i32 67, label %14
i32 73, label %12
]
12: ; preds = %9
%13 = getelementptr inbounds [100 x i32], [100 x i32]* %2, i64 0, i64 0
store i32 1, i32* %13
br label %22
14: ; preds = %9
%15 = getelementptr inbounds [100 x i32], [100 x i32]* %2, i64 0, i64 0
store i32 100, i32* %15
br label %22
16: ; preds = %9
%17 = getelementptr inbounds [100 x i32], [100 x i32]* %2, i64 0, i64 0
store i32 50, i32* %17
br label %22
18: ; preds = %9
%19 = getelementptr inbounds [100 x i32], [100 x i32]* %2, i64 0, i64 0
store i32 5, i32* %19
br label %22
20: ; preds = %9
%21 = getelementptr inbounds [100 x i32], [100 x i32]* %2, i64 0, i64 0
store i32 10, i32* %21
br label %22
22: ; preds = %9, %12, %14, %16, %18, %20
%23 = call i32 @strlen(i8* %4)
%24 = icmp sgt i32 %23, 1
br i1 %24, label %28, label %25
25: ; preds = %50, %22, %0
%26 = call i32 @strlen(i8* %4)
%27 = icmp sgt i32 %26, 0
br i1 %27, label %55, label %65
28: ; preds = %22, %50
%29 = phi i64 [ %51, %50 ], [ 1, %22 ]
%30 = getelementptr inbounds [100 x i8], [100 x i8]* %1, i64 0, i64 %29
%31 = load i8, i8* %30
%32 = sext i8 %31 to i32
switch i32 %32, label %40 [
i32 88, label %37
i32 86, label %33
i32 76, label %34
i32 67, label %35
i32 73, label %36
]
33: ; preds = %28
br label %37
34: ; preds = %28
br label %37
35: ; preds = %28
br label %37
36: ; preds = %28
br label %37
37: ; preds = %28, %36, %35, %34, %33
%38 = phi i32 [ 5, %33 ], [ 50, %34 ], [ 100, %35 ], [ 1, %36 ], [ 10, %28 ]
%39 = getelementptr inbounds [100 x i32], [100 x i32]* %2, i64 0, i64 %29
store i32 %38, i32* %39
br label %40
40: ; preds = %37, %28
%41 = getelementptr inbounds [100 x i32], [100 x i32]* %2, i64 0, i64 %29
%42 = load i32, i32* %41
%43 = add nuw i64 %29, 4294967295
%44 = and i64 %43, 4294967295
%45 = getelementptr inbounds [100 x i32], [100 x i32]* %2, i64 0, i64 %44
%46 = load i32, i32* %45
%47 = icmp sgt i32 %42, %46
br i1 %47, label %48, label %50
48: ; preds = %40
%49 = sub nsw i32 %42, %46
store i32 %49, i32* %45
store i32 0, i32* %41
br label %50
50: ; preds = %40, %48
%51 = add nuw nsw i64 %29, 1
%52 = call i32 @strlen(i8* %4)
%53 = sext i32 %52 to i64
%54 = icmp slt i64 %51, %53
br i1 %54, label %28, label %25
55: ; preds = %25, %55
%56 = phi i64 [ %61, %55 ], [ 0, %25 ]
%57 = phi i32 [ %60, %55 ], [ 0, %25 ]
%58 = getelementptr inbounds [100 x i32], [100 x i32]* %2, i64 0, i64 %56
%59 = load i32, i32* %58
%60 = add nsw i32 %59, %57
%61 = add nuw nsw i64 %56, 1
%62 = call i32 @strlen(i8* %4)
%63 = sext i32 %62 to i64
%64 = icmp slt i64 %61, %63
br i1 %64, label %55, label %65
65: ; preds = %55, %25
%66 = phi i32 [ 0, %25 ], [ %60, %55 ]
%67 = call i32 @printf(i8* getelementptr inbounds ([3 x i8], [3 x i8]* @.str, i64 0, i64 0), i32 %66)
ret i32 0
}