Конвертирование арабских цифр в римские

да. задачка оказалась интересной. внесу свои пять копеек в фонд решений. оптимизацию и запрет глобальных переменных в топку. главное работает

В строке 17 переменная i объявлена как size_t,а значит как минимум не может принимать отрицательные значения. В связи с этим в цикле (строка 24) условие i >= 0 будет всегда TRUE и от сюда следует бесконечный цикл.
Возможно я чего-то не понимаю конечно или мой компилятор minGw чего то не понимает, но я бы в место size_t объявил переменнаю i с типом int. В таком случае в бесконечный цикл не провалится.

Добавлено через 2 минуты
еще хотел бы добавить что программа на мой взгляд не совсем корректна. т.к. числа типа ХХХХ или IIIIIII программой считаются верными. Хотя они долны иметь запись XL и IIX, соответственно.

Перевод римских чисел в арабские. Пример автоматного распознавателя

Задача

Можно использовать вложенные операторы case. Это удобно, например, при реализацииавтоматных распознавателей, которые дают способ наглядной записи алгоритмов распознавания текстов.

Представленная таблица предназначена для перевода римских чисел, составленных из цифр X, V, I.

Решение

Алгоритм решения задачи:

Первый столбец (цифры от 1 до 7) – это состояния (state).

Для расшифровки XIV начинаем с состояния 1. Первый символ – ‘X’, поэтому смотрим столбец ‘X’ и находим n := 10; state := 2. Итак, полагаем n равным 10 и сдвигаем стрелку на вторую строку. Теперь смотрим столбец, определяемый вторым символом, т.е. ‘I’, и находим n := n + 1; state := 6. Значение n, таким образом, становится 10 + 1 = 11. Сдвигаем стрелку к строке 6. Теперь в столбце ‘V’ находим n := n + 3; state := 7. Значение n становится равным 11 + 3 = 14. Сдвигаем стрелку на строку 7 и замечаем, что любая следующая цифра ‘X’, ‘V’ или ‘I’ будет теперь ошибкой (чисел XIVX, XIVV, XIVI не может быть).

Эта таблица позволяет декодировать римскую запись чисел, содержащих любое количество цифр X (в начале) и цифры V, I, записанные по обычным правилам:
I, II, III, IV, V, VI, VII, VIII, IX, X, XI и т.д.

Вместе с тем такое число как IIII будет воспринято как ошибочное и переменная ok примет значение false. Для работы с цифрами M, D, C и L таблицу можно расширить.

Программа на языке Паскаль:

Программа не выдает ошибок, но и не работает.

О римских цифрах

Описание записи числа римскими цифрами. Конвертер между римскими цифрами и десятичными цифрами.

Римляне, как известно, использовали для записи числа латинские буквы.

Считается, что римская система счисления является классическим примером непозиционной системы счисления, то есть такой системы счисления, в которой величина, которую обозначает цифра, не зависит от положения в числе.

Напомним, что в римской системе счисления I обозначает 1, V обозначает 5, X — 10, L — 50, C — 100, D — 500, M — 1000.
Например, число 3 в римской системе счисления будет обозначаться как III.

Однако на самом деле не все так просто, и она не является полностью непозиционной системой счисления, потому что в римской системе счисления есть дополнительное правило, которое влияет на величину, которую обозначает цифра, в зависимости от ее положения.

Правило это запрещает употреблении одной и той же цифры более 3 раз подряд, поэтому три это III, а четыре это уже IV, и I(1), стоящая перед большей цифрой V(5), обозначает вычитание, то есть фактически равна -1.

Ниже два калькулятора — для перевода числа из диапазона 1 – 3999 в римское число и наоборот.
Для чисел больше 3999 используется несколько другая нотация.

Преобразование арабских чисел в РИМСКИЕ.

Иногда в таблице необходимо отобразить обычные арабские числа в римском написании. Например: когда вы провели расчеты (вычисления) арабскими числами. А отобразить их в приложении к договору или в бланке нужно в римских цифрах.

Для этого можно использовать функцию «РИМСКОЕ». Функция преобразует арабские цыфры в римские в текстовом формате.

Рассмотрим на примере:

• Ставим курсор в ячейку
• Запускаем мастер функций
• Выбираем функцию «РИМСКОЕ»
• В появившемся окне указываем число или ячейку, из которой будут обрабатывается данные.
• НажимаемEnter.

Как перевести римские цифры на русские (арабские)?

Многие пользователи интернета очень часто так задают вопрос, когда нужно перевести какое-то римское число в арабское. Как это правильно делать — римское в арабское?

Здесь нужно знать полностью какой знак что именно означает. Если бы наяву, я бы вам подсказал, а так. просто нет римских чисел на буке, чтобы их изобразить. Как-то не очень давно я задался целью научиться преобразовывать римские числа в арабские, и это у меня получилось уже со второго раза. Поверьте, это очень даже легко. I-1, V-5, X-10, L-50 C-100, D-500, M-1000. А теперь представьте, что перед вами римское число MCMLXXXVI. Как вы думаете, что это за число? Расшифровываем. Первая М-1000, затем обращаем внимание, что следующее число состоит из нескольких знаков, как и все последующие: СМ-900, LXXX-80, VI-6. Складываем всё в кучу, получаем 1986. Нужно просто знать полную расшифровку римских чисел. I-1, II-2, III-3, IV-4, V-5, VI-6, VII-7, VIII-8, IX-9, X-10. Второй десяток прибавляем после 10-ти (Х) первый ряд. Затем начинается такая же цепочка из десятков: ХХ-20, ХХХ-30, XL-40, L-50, LX-60, LXX-70, LXXX-80, XC-90, C-100. Затем идут сотни СС-200, CCC-300, CD-400, D-500, DC-600, DCC-700, DCCC-800, CM-900, M-1000. Вот весь ряд до тысячи. С этим рядом риских чисел можно спокойно переводить даже очень большие римские числа в арабские, просто нужно быть внимательным.

конвертер Римские цифры в Арабские и наоборот

Язык Java /

Основы языка Java

У меня задание сделать конвертер Римские цифры в Арабские и наоборот. Написать в два класса. С Арабских цифр в РИсмкие у меня нормально конвертирует, а вот с РИмских цифр у меня с 4 и 9 проблема. Так как не могу прописать IV и IХ в case. Как же написать код, чтоб программа правильно распознавала 4 и 9. Когда я ввожу например: IX программа выдает 11. А так же когда IV выдает 6.
Спасибо.

Спасибо за помощь

Надо объявить в начале
static int last = 2000;
А потом, в convertRomanToInt, вместо integerValue += number;

All-Calc.com

Архивы

Конвертация из римских цифр в арабские

Онлайн инструмент для конвертации из римского числа в арабское.

Как пользоваться калькулятором

Введите в поле соответствующее поле стандартное число. После нажмите на красную кнопку «Конвертация». Программа автоматически конвертирует заданное число в соответствующую римскую цифру.

Примечание

Вводите римские цифры с помощью английской раскладки клавиатуры: I, V, X, S…

Теория

Стандартные числа — натуральные числа, которые возникают естественно при счете: 1, 2, 3…

Римские цифры использовались древними римлянами в их системе счисления.

Арабские цифры — название набора из десяти знаков: 0, 1, 2, 3, 4, 5, 6, 7, 8, 9

MaxSpT-Blog

Задание: Написать программу(-ы) для перевода из 10-й системы в римскую и обратно.

Специфика: Римская система счисления не является позиционной, то есть разобраться с переводом в один традиционный цикл не получится.

Первые идеи: Первое что мне пришло в голову, так это разобраться что есть римские цифры и какой у них диапазон. Римскими цифрами можно задать число от 1 до 3999 (I-MMMIM).

Справка по Римским цифрам была взята отсюда.Вот краткая таблица однозначного перевода:

quattuordecim
	septendecim
	duodeviginti
	undeviginti
	unus et viginti
	quadraginta
	quinquaginta
	septuaginta
	quadringenti
	septingenti
	octingenti
Идея алгоритма перевода из Римских в 10-е: Получать на вход строку (заведомо правильную) Считывать по одному(двум) элементу(-ам) и по соответствующему символу добавлять к переменной-сумме какое-либо число. Т.е. нашли I=>sum++, V=>sum=sum+5 и т.д. Тут у меня возник логичный вопрос, а что делать, если строка заведомо не правильная. В рамках задачи это не рассматривается, но мы же не ищем легких путей. Итак, слои проверки строки, которые покрывают большинство ошибок в выполнении программы: Проверить строку на корректность, т.е. проверить принадлежит ли каждый элемент строки одной из римских цифр. Проверить строку на повторяющиеся одиночные-тройные символы. Скажем, III=3, а вот IIII(по идее 4, но 4=IV)-такого числа в Римской системе счисления нет, так же как и VIIII (по идее 9, но 9=IX) Посимвольно проверить не стоит ли цифра с меньшим номиналом, перед старшей, исключением являются IV, IX, XV и подобные, полный список можно будет посмотреть ниже. Данные проверки ловят большинство ошибок, но опять же я не уверен, что не найдется примера, на котором программа сложится. Идея алгоритма перевода из 10-х в Римские: Считать число Найти кол-во тысяч, добавить в выходную строку соответствующие символы. Найти кол-во сотен, добавить в выходную строку соответствующие символы. Найти кол-во десятков, добавить в выходную строку соответствующие символы. Найти кол-во единиц, добавить в выходную строку соответствующие символы. Учесть исключения, скажем 999=IM(исключение), а 998=CMXCVIII -Почему именной такой порядок? Идти же можно в любом другом ? Да, можно идти в любом другом, но зачем париться насчет порядка символов в строке после преобразования? Чтобы не быть голословным, я представлю свой код программы на Pascal. Большинство кода для выполнения задачи тут не нужно (Потому что он написан по принципу «Because i can») для вас будут интересны пункты (Ctrl+F) : (тут всего 175 строчек, не печальтесь) program RimToArab; const M=7; function getPriority(a: char):integer; var p:integer; begin p:=0; if (a =’M’)then p:=14; if (a=’D’) then p:=11; if (a=’C’) then p:=9; if (a=’L’) then p:=7; if (a=’X’) then p:=5; if (a=’V’) then p:=3; if (a=’I’) then p:=1; getPriority:=p; end; function getPriority(a,b: char):integer; var p:integer; begin p:=0; if (a =’I’)and(b=’M’)then p:=13; if (a =’C’)and(b=’M’)then p:=12; if (a=’C’)and(b=’D’) then p:=10; if (a=’X’)and(b=’C’) then p:=8; if (a=’X’)and(b=’L’) then p:=6; if (a=’I’)and(b=’X’) then p:=4; if (a=’I’)and(b=’V’)then p:=2; getPriority:=p; end; var k,g,i,des,sot,tic,err,t,prior,minPrior : integer; inpstr,outstr: string; ErrorArray:array [1..M]of string; ErrorArray[1]:=’VV’;ErrorArray[2]:=’IIII’;ErrorArray[3]:=’MMMM’;ErrorArray[4]:=’XXXX’;ErrorArray[5]:=’CCCC’;ErrorArray[6]:=’LL’;ErrorArray[7]:=’DD’; err:=0; k:=0; i:=0; g:=1; writeln(‘Введите число 1-3999 или I-MMMIM(англ)’); readln(inpstr); val(inpstr,t,err); if (err<>0)and(Length(inpstr)>0) then begin err:=0; minPrior:=14; prior:=getPriority(inpstr[1]); for t:=1 to M do if (Pos(ErrorArray[t],inpstr)<>0) then err:=10;<Первичная проверка строки> for t:=1 to Length(inpstr) do if not(inpstr[t] in [‘M’,’D’,’C’,’L’,’X’,’V’,’I’]) then begin writeln(‘Ошибка преобразования(0):*’,inpstr[t],’*’);err:=10;break;end; t:=1; while (t minPrior)then begin writeln(‘Ошибка преобразования(1):*’,inpstr[t],inpstr[t+1],’*’);err:=10;break;end; if(prior minPrior) then begin writeln(‘Ошибка преобразования(2):*’,inpstr[t],inpstr[t+1],’*’);err:=10;break;end; t:=t+1; end; if (prior>0)and(minPrior>=getPriority(inpstr[t])) then minPrior:=getPriority(inpstr[t]) else if (prior =getPriority(inpstr[t-1],inpstr[t])) then minPrior:=getPriority(inpstr[t-1],inpstr[t]); Inc(t); if err<>0 then writeln(‘Римское число не корректно’) else begin while g =1) and (k 3999)) then begin writeln(‘Арабское число не корректно ‘, i); end <Основной алгоритм перевода Арабских цифр в Римские> else begin if i=3999 then begin outstr:=’MMMIM’;i:=0; end; if i=2999 then begin outstr:=’MMIM’;i:=0; end; if i=2999 then begin outstr:=’MIM’;i:=0; end; if i=1999 then begin outstr:=’MIM’;i:=0; end; if i= 999 then begin outstr:=’IM’;i:=0; end; <Выдираем тысячи> tic:=i div 1000; if tic>0 then begin while tic<>0 do begin outstr:=outstr+’M’; Dec(tic); end; if tic=0 then i:=i mod 1000; end; <Выдираем Сотни > sot:=i div 100; if sot>0 then begin if sot=4 then begin sot:=0; outstr:= outstr+’CD’; end else if sot=9 then begin sot:=0; outstr:= outstr+’CM’; end else if ((sot>=5) and (sot 0 then while sot<>0 do begin outstr:=outstr+’C’; Dec(sot); end; if sot=0 then i:=i mod 100; end; <Выдираем десятки> des:=i div 10; if des > 0 then begin if des=4 then begin des:=0; outstr:=outstr + ‘XL’; end else if des=9 then begin outstr:=outstr+’XC’; des:=0; end else if ((des>=5)and(des 0 then while des<>0 do begin outstr:=outstr+’X’; Dec(des); end; if des=0 then i:=i mod 10; end; <Выдираем единицы> if i>0 then begin if i=4 then begin outstr:=outstr+’IV’; i:=0; end else if i=9 then begin outstr:=outstr+’IX’; i:=0; end else if ((i>=5) and (i 0 then while i<>0 do begin outstr:=outstr+’I’; Dec(i); end; end; end; end; if Length(outstr)<>0 then writeln(‘выходная строка: ‘,outstr); readln(); END. Илон Маск рекомендует:  PInt64 - Тип Delphi Понравилась статья? Поделиться с друзьями: Вам также может быть интересно Обучение программированию Юмор пиво для программиста ХАЙФХАК: ПРОГРАММИСТ ВЗЛОМАЛ СИСТЕМУ, ЧТОБЫ ПОПИТЬ ПИВО БЕСПЛАТНО / пиво :: geek новости :: Обучение программированию Язык обработки данных awk Примеры команды AWK в Linux Введение AWK назван в честь фамилии его авторов: Альфред Обучение программированию Я загружаю timagelist динамически как сделать картинки из timagelist прозрачными Я загружаю timagelist динамически как сделать картинки из timagelist прозрачными? Элемент управления ImageList содержит Обучение программированию Язык преобразований xsl (xslt) Введение в XSLT XSLT представляет собой способ для XML-документов в другие XML или документы Обучение программированию Является ли указанная страница — домашней (IE) Является ли указанная страница — домашней? (IE) При создании новой вкладки (about:Tabs) в IE9 Обучение программированию Язык преобразований XSLT Справочник по интерфейсу администратора Ссылки Назад «> Вверх Вперед Опубликованные SQL View > XSLT Обучение программированию Ядро и процессы Что такое ядро в биологии? Строение и функции ядра В каждой живой клетке протекает Обучение программированию Язык программирования alfa Язык программирования alfa По питанию контроллеры делятся на два типа: с питанием 220 В Обучение программированию Язык cc C++ — Базовый синтаксис Когда мы рассматриваем программу на C ++, ее можно определить Обучение программированию Язык рефал Язык рефал Ура! Сегодня, 30.05.2005, наконец появилась адаптированная к современным платформам Windows-(95/98/ME/NT/2000/XP) и UNIX Обучение программированию Эффект pазвивающегося флага Scrontch’s Flag Designer Design Your Flag! Generates Scalable Vector Graphics (SVG). This App requires Обучение программированию Язык sql SQL-Урок 1. Язык SQL. Основные понятия. Для того, чтобы начать изучать SQL нам нужно Обучение программированию Язык с C++ с нуля Этот самоучитель создан для тех, кто хочет освоить основы программирования на Обучение программированию Эффект горящей надписи Простой огненный текст в Фотошопе Конечный результат: Ресурсы урока: Шаг 1 Создайте новый документ Обучение программированию Язык xml documents type definitions (dtd) Язык XML — практическое введение . Documents Type Definitions (DTD) В XML- документах DTD Обучение программированию Языки и грамматики простейший компилятор ГРАММАТИКА ЯЗЫКОВ ПРОГРАММИРОВАНИЯ Описанию грамматики языка предшествует описание его алфавита. Алфавит любого языка состоит Обучение программированию Эффект ледяной надписи Ледяной текст в Фотошопе Конечный результат: Ресурсы урока: 1. Создание фона Шаг 1 Создайте Обучение программированию Язык xml dom совместимые анализаторы XML-анализаторы в java XML как набор байт в памяти, запись в базе или текстовый Обучение программированию Языки описания пользовательских интерфейсов Языки описания пользовательских интерфейсов Язык описания интерфейсов Язык описания интерфейсов (IDL), используемый OMG определяет Обучение программированию Эффект линзы (watcom c) Эффект линзы (watcom c) Просветляющие покрытия от ZEISS Высококачественные линзы требуют высоколассного подхода: защита, Обучение программированию Язык xml xml в microsoft internet explorer 5 0 Основы XML для начинающих пользователей Введение в правильную разметку XML означает Extensible Markup Language, Обучение программированию Языки программирования Языки программирования Язык программирования — искусственный (формальный) язык, предназначенный для записи программ для исполнителя Обучение программированию Эффект пламени По-настоящему яркие ролики: эффект огня для видеомонтажа Как поразить зрителей с первых кадров? Самый Обучение программированию Язык xml введение Язык xml введение XML технологии и средства разработки Gupta Team Developer: XML технологии (Часть