78 / 0 / 1
Регистрация: 31.10.2016
Сообщений: 99
1

Римские цифры в арабские

15.02.2020, 13:27. Показов 807. Ответов 3
Метки нет (Все метки)

Нужен конвертер римских цифр в арабские. Алгоритм конвертации понятен, а вот как мне грамотно оформить функцию?
__________________
Помощь в написании контрольных, курсовых и дипломных работ здесь
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
15.02.2020, 13:27
Ответы с готовыми решениями:

Римские цифры в арабские
Как мне переконвертировать римские цифры в арабские? Добавлено через 1 минуту Додумался.

Арабские цифры в римские
Для записи римскими цифрами используются символы I, V, X, L, С, D, М, обозначающие соответственно...

арабские цифры в римские
Написать программу, которая переводит арабские цифры в римские. Добавлено через 1 час 45 минут...

Арабские цифры в римские
Возможно кто-то сталкивался и может поделиться? 1-> I 2-> II 3->III 4->IV ну, и так далее. ...

3
4195 / 1569 / 269
Регистрация: 10.12.2013
Сообщений: 5,436
15.02.2020, 22:18 2
Подумаешь, бином Ньютона.

PowerShell
1
raku -e '.say for Ⅳ .. Ⅻ'
output:
Код
4
5
6
7
8
9
10
11
12
0
78 / 51 / 22
Регистрация: 16.06.2016
Сообщений: 150
16.02.2020, 05:50 3
1. Roman numerals/Decode

2. Powershell: convert roman numbers to decimal
0
Покинул форум
3528 / 1092 / 302
Регистрация: 07.05.2015
Сообщений: 2,223
17.02.2020, 12:06 4
С предварительной проверкой корректности римского числа.
PowerShell
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
#requires -version 6
function ConvertFrom-Roman {
  <#
    .EXAMPLE
        ConvertFrom-Roman XLVII # 47
    .EXAMPLE
        'dlxxvii' | ConvertFrom-Roman # 577
    .EXAMPLE
        ('mmxx', 'cdxxix', 'di').ForEach{ConvertFrom-Roman $_} # 2020, 429, 501
  #>
  [CmdletBinding()]
  param(
    [Parameter(Mandatory, ValueFromPipeline)]
    [ValidatePattern('^(?=[MDCLXVI])M*(C[MD]|D?C{0,3})(X[CL]|L?X{0,3})(I[XV]|V?I{0,3})$')]
    [ValidateNotNullOrEmpty()]
    [String]$Number
  )
 
  process {
    $map = @{I = 1; V = 5; X = 10; L = 50; C = 100; D = 500; M = 1000}
    for ($i, $a = 0, [Char[]]$Number; $i -lt $a.Length; $i++) {
      ${<}, ${>} = "$($a[$i])", "$($a[$i + 1])"
      $dec += [Int64]"$('+-'[$i + 1 -lt $a.Length -and $map[${<}] -lt $map[${>}]])$($map[${<}])"
    }
    $dec
  }
}
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
17.02.2020, 12:06

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

Арабские цифры в римские
Перевод арабских цифр в римские. Саму задачу я решил, так что код как таковой мне не нужен, просто...

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

Года, арабские цифры в римские
Подскажите пожалуиста хотя бы по какому принцыпу мне продолжить написание кода. Т.е. не могу понять...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
4
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2022, CyberForum.ru