Это год MDLXVII в мире, в котором никогда не пала Римская империя, и никогда не происходил крах в темные века. Из-за длительного периода Pax Romana, экономическая стабильность империи позволила технологии развиваться быстрыми темпами.

Римляне начали увлекаться схемотехникой и изобрели оригинальный калькулятор, который не требует использования кнопки «равно». Они называют это "римско-польской нотацией"

Чтобы сделать расчет, они сначала вводят свои операнды, а затем операцию.

Например, 100 + 11 * 20 будет C XI XX * +.

Дополнительно

Римляне обнаружили, что им часто нужно выполнять несколько вычислений одновременно, и предпочитают, чтобы метод возвращал каждое значение «в стеке» в некой структуре типа массива / списка / кортежа. (например X I + X I - CC II +, вернется [11, 9, 202])

Задача состоит в том, чтобы разработать программу-калькулятор, способную выполнять эти вычисления.

Пояснение : требуется вычитание. Я не осознавал, что это не было признано в древнеримской империи. Задача была поэтому неоднозначной, и я прошу прощения.

Минимальные рекомендации

• Ваш вывод будет в арабских цифрах.
• Вам нужно только конвертировать из римских цифр до 5000.
• Вам нужно будет поддерживать операции +, -, /, * (сложение, вычитание, деление и умножение).
• Будет ли деление основано на числах с плавающей запятой или на целых числах, зависит от реализации. Либо работает для этого вызова.
• Ваш вывод должен поддерживать номера до 4 миллиардов.
• Самый короткий ответ в целом, И на каждом языке выигрывает. Это Code Golf Challenge, но я люблю разнообразие.

В случае ничьей такие факторы, как поддержка римских цифр выше 5000 или дополнительные операции, будут считаться наиболее ранними.

Python 2 + римский , 118 байт

from roman import*
s=[]
for i in input().split():s+=[eval(s.pop(-2)+i+s.pop())if i in"+-/*"else`fromRoman(i)`]
print s

демонстрация

Он не может быть протестирован онлайн из-за модуля, который он использует, но вы можете увидеть, как запустить его здесь (полная программа, принимающая входные данные из STDIN - выражение с кавычками - и распечатывающая выходные данные в STDOUT - в форме списка стек). Использует немного более старую версию, потому что я не буду создавать новый GIF только для нескольких байтов:

Чтобы установить пакет, вы можете запустить следующее в терминале / командной строке:

pip install roman

Haskell , 217 байт

-13 байтов благодаря Брюсу Форте. -73 байта благодаря Орджану Йохансену.

foldl(!)[].words
s@ ~(x:y:z)!n=last$(a n:s):[y`f`x:z|(f,c)<-zip[(+),(-),(*),(/)]"+-*/",n==[c]]
a s=last$0:[n+a(drop(length x)s)|(n,x)<-zip l$words"I IV V IX X XL L XC C CD D CM M",x<=s,x++"Y">s]
l=[1,4,5,9]++map(10*)l

Попробуйте онлайн!

Ручная реализация, ууу!

SOGL V0.12 , 57 байт

θ{:u=?F!!}F:u=‽0AøF{1"IVXLCDM”GWH∫2%3*⁽*}aa⁵<⌡±;A}a¹∑ι}}⁰

Попробуй здесь!

JavaScript (узел) + романы + stk-lang , 74 байта

s=>(R=require)("stk-lang")(s.replace(/\w+/g,R("romans").deromanize)).stack

Возвращает список больших участников.

выполнение

Запустите следующее:

npm install romans
npm install stk-lang
node

Затем вставьте функцию. Пример:

C:\Users\conorob\Programming\golf-new\roman
λ npm install romans
npm WARN saveError ENOENT: no such file or directory, open 'C:\Users\conorob\Programming\package.json'
npm WARN enoent ENOENT: no such file or directory, open 'C:\Users\conorob\Programming\package.json'
npm WARN Programming No description
npm WARN Programming No repository field.
npm WARN Programming No README data
npm WARN Programming No license field.

+ romans@1.0.0
added 1 package in 0.801s

C:\Users\conorob\Programming\golf-new\roman
λ npm install stk-lang
npm WARN saveError ENOENT: no such file or directory, open 'C:\Users\conorob\Programming\package.json'
npm WARN enoent ENOENT: no such file or directory, open 'C:\Users\conorob\Programming\package.json'
npm WARN Programming No description
npm WARN Programming No repository field.
npm WARN Programming No README data
npm WARN Programming No license field.

+ stk-lang@1.0.0
added 1 package in 0.847s

C:\Users\conorob\Programming\golf-new\roman
λ node
> s=>(R=require)("stk-lang")(s.replace(/\w+/g,R("romans").deromanize)).stack
[Function]
> f=_
[Function]
> f("X I + X I - CC II +").map(e => e.toString())
[ '11', '9', '202' ]
> f("C XI XX * +").map(e => e.toString())
[ '320' ]
> f("MMMM M I - +").map(e => e.toString())
[ '4999' ]

Дьялог АПЛ , 93 байта

⎕CY'dfns'
a←⍬⋄{0::{a,←⍵}roman⍵⋄f←⍎'+-÷×'⌷⍨'+-/*'⍳⍵⋄r←f/¯2↑a⋄a↓⍨←¯2⋄a,←r}¨{1↓¨⍵⊂⍨⍵∊' '}' ',⍞⋄a

Попробуйте онлайн!

116 байт без римской встроенной

Python 3 , 280 206 байт

N=dict(I=1,V=5,X=10,L=50,C=100,D=500,M=1000)
def d(s):
	n=0
	for v in map(N.get,s):n+=v-n%v*2
	return n
def c(w):
	s=[]
	for t in w.split():s+=[str(d(t)if t[0]in N else eval(s.pop(-2)+t+s.pop()))]
	return s

Попробуйте онлайн!

На этот раз с поддержкой вычитающих обозначений. Метод cявляется основной точкой входа; другой - поддержка.

Редактировать журнал:

• 74 вниз благодаря Эрджану

JavaScipt (ES6), 152 151 байт

Сохранено 1 байт благодаря пользователю 202729

p=>p.split` `.map(c=>s.push(eval("+-/*".indexOf(c)+1?(T=s.pop(),s.pop())+c+T:c.replace(/./g,c=>"+"+{I:1,V:5,X:10,L:50,C:100,D:500,M:1e3}[c]))),s=[])&&s

Контрольные примеры

f=p=>p.split` `.map(c=>s.push(eval("+-/*".indexOf(c)+1?(T=s.pop(),s.pop())+c+T:c.replace(/./g,c=>"+"+{I:1,V:5,X:10,L:50,C:100,D:500,M:1e3}[c]))),s=[])&&s
console.log(f("C XI XX * +"))
console.log(f("X I + X I - CC II +"))

Объяснение (меньше в гольфе)

V={I:1,V:5,X:10,L:50,C:100,D:500,M:1e3}     // Values of the roman numerals
p=>(
 s=[],                                      // Initialize the stack
 p.split` `.map(c=>                         // For every part in the input:
  "+-/*".indexOf(c)+1?                      //   If the input is an operator:
   s.push(eval((T=s.pop(),s.pop())+c+T))    //     Evaluate the operator on the top of the stack
  :                                         //   Else (if it is a roman numeral):
   s.push(eval(c.replace(/./g,c=>"+"+V[c])))//     Push the sum of the characters' values
 ),s)                                       // return the stack

Желе , 82 байта

ị“+-×÷”;”/v®ṫ-¤®ṖṖ¤;©
4Ḷ⁵*p1,5P€
“IVXLCDM”iЀị¢µIN‘Ṡæ.µ®;©
Ḳµ“+-*/”W€i⁸Ñ⁸Ǥ¹?µ€ṛ®Ḋ

Попробуйте онлайн!

Первоначально опубликовано в чате .

Объяснение:

Поскольку у Jelly нет стека, я поместил этот стек в реестр.

Когда программа запускается, значением регистра ®является то 0, которое рассматривается как [0]для целей этой программы.

ị“+-×÷”;”/v®ṫ-¤®ṖṖ¤;©       Link 1: Given an operator index (an
                            integer in range 1..4), apply it.

ị“+-×÷”                     Index to the string "+-×÷"
       ;”/                  Concatenate with the character "/",
                            which is Jelly splat operator.
          v   ¤             Evaluate with parameter...
           ®                  the register's
            ṫ                 tail
             -                from -1. (2 last items)
               ®  ¤;        Concatenate with the register value,
                ṖṖ            pop twice.
                    ©       Store the result to register.

4Ḷ⁵*p1,5P€          Link 2: Niladic, generate [1,5,10,50,...]
4Ḷ                  Lowered range of 4, gives [0,1,2,3].
  ⁵*                Raise to power of 10. Value = 1,10,100,1000.
    p1,5            Calculate Cartesian product with [1,5].
                      Value = [1,1],[1,5],[10,1],[10,5],...
        P€          Calculate product of each item.

Alternatively, ×þ1,5F would also work instead of p1,5P€.

“IVXLCDM”iЀị¢µIN‘Ṡæ.µ®;©   Link 3: Given roman number, push it
                            to the stack (register).
         i                  Find index of ...
          Ѐ                  each character ...
“IVXLCDM”                     in "IVXLCDM".
            ị¢              Index to last link. (link 2)
              µ             With that value, (consider LIX ->
                            [50,1,10] for example)
               I             
Ḳµ“+-*/”W€i⁸Ñ⁸Ǥ¹?µ€ṛ®Ḋ

[TODO complete explanation]

Python 3 , 216 187 байт

from operator import*
N=dict(I=1,V=5,X=10,L=50,C=100,D=500,M=1000)
def f(w):
	s=[]
	for t in w.split():s+=[str(sum(map(N.get,t)))if t[0]in N else str(eval(s.pop(-2)+t+s.pop()))]
	return s

Попробуйте онлайн!

Потому что оно появилось в комментариях как к вопросу, так и к этому ответу и, вероятно, привело к отрицательному голосованию: это представление не поддерживает субтрактивную запись. Обоснование: Субтрактивная запись редко использовалась в Римской империи и только популяризировалась позже (см. Subtractive Notation , параграф 3, последнее предложение). Задача предполагает Римскую империю, которая разработала программируемые интегральные схемы, а не ту, которая претерпела те же культурные изменения, что и Европа 13-го века. В описании не упоминаются субтрактивные обозначения, и ни один из примеров не использует их.