use v6;
my ($s, $t) = get().chomp.split(' ');
my @arr = ("I", "II", "III", "IIII", "V", "VI", "VII", "VIII", "IX", "X", "XI", "XII");

loop (my $i = 0; $i < 12; $i++) {
       	if (@arr[$i] eq $s) {
       		$i += $t;
       		$i %= 12;
       		say @arr[$i];
       		last;
       	}
}

exit;