Римская система счисления.

@TransformatoR · Регистрация: 31.08.2010

Студворк — интернет-сервис помощи студентам

Всем здравствуйте!
Очень нужна помощь в написании программы по переводу из римской системы счисления в арабскую на языке СИ.
Я в этом почти ничего не понимаю.
Заранее спасибо!

@rrrFer · 31.08.2010, 21:20

чем помочь?

@TransformatoR · 31.08.2010, 21:25 **[ТС]**

Сообщение от rrrFer

чем помочь?

Да, наверное, лучше написать её, а то я всю свою жизнь в турбо-паскале писал, а тут задали на мою голову, так что, боюсь, не смогу...
Буду очень признателен!

silent_1991 · 31.08.2010, 21:28

TransformatoR,
У вас есть идеи по решению задачи?

@TransformatoR · 31.08.2010, 21:31 **[ТС]**

В Pascal я это сделалс помошью оператора Case. Однако, здесь его, похоже, нету... По-этому, я не имею даже малейшего понятия

silent_1991 · 31.08.2010, 21:31

В си есть оператор case. Но даже не будь его, можно было бы обойтись и if-else.

@TransformatoR · 31.08.2010, 21:35 **[ТС]**

Малость перепутал... С помощью for to do, однако, на СИ я не знаю даже элементарных команд..

silent_1991 · 31.08.2010, 21:35

Давайте код на паскале

Jupiter · 31.08.2010, 21:36

TransformatoR, смотри здесь и пределывай))

@TransformatoR · 31.08.2010, 21:45 **[ТС]**

Сообщение от silent_1991

Давайте код на паскале

Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
var s:string;        {Proga!!!!}
    n,c,c1,i,a:integer;
begin writeln('Vvedite chislo:');
      readln(s);
      c:=0;n:=0;
      for i:=1 to length(s) do
        begin
            c1:=c;
            if s[i]='I' then c:=1;
            if s[i]='V' then c:=5;
            if s[i]='X' then c:=10;
            if s[i]='L' then c:=50;
            if s[i]='C' then c:=100;
            if s[i]='D' then c:=500;
            if s[i]='M' then c:=1000;
            if c>c1 then a:=-2*c1
                    else a:=0;
            n:=n+a+c
    end;
      writeln('Vashe chislo',n);
      readln;
end.

Добавлено через 4 минуты

Сообщение от Maxwe11

TransformatoR, смотри здесь и пределывай))

Насколько я понял. там только постановка задачи, однако нет её решения...

silent_1991 · 31.08.2010, 21:50

C
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
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
#include <stdio.h>
#include <stdlib.h>
#include <conio.h>
 
int main()
{
    char s[256];
    int n, c, c1, i, a;
    
    printf("Vvedite chislo: ");
    scanf("%s", s);
    
    for (i = 0, c = 0, n = 0; i < strlen(s); i++)
    {
        c1 = c;
        
        if (s[i] == 'I')
            c = 1;
            
        if (s[i] == 'V')
            c = 5;
 
        if (s[i] == 'X')
            c = 10;
 
        if (s[i] == 'L')
            c = 50;
 
        if (s[i] == 'C')
            c = 100;
 
        if (s[i] == 'D')
            c = 500;
 
        if (s[i] == 'M')
            c = 1000;
 
        if (c > c1)
            a = -2 * c1;
        else
            a = 0;
 
        n += a + c;
    }
 
    printf("Vashe chislo: %d", n);
    getch();
    return 0;
}

Jupiter · 31.08.2010, 21:50

TransformatoR, смотри https://www.cyberforum.ru/cpp-... post886087 418-й пост

@TransformatoR · 31.08.2010, 21:57 **[ТС]**

silent_1991
Что значит эта строчка: for (i = 0, c = 0, n = 0; i < strlen(s); i++)
Она почему-то не компилируется

silent_1991 · 31.08.2010, 21:59

TransformatoR,
Попробуй в самом начале, где строки #include ..., написать #include <string.h>

@TransformatoR · 31.08.2010, 22:00 **[ТС]**

Maxwe11, Что-то я просмотрел.. Действительно, однако мне нужно, что структура решения была схожа с примером на Pascal, приведённым выше.

silent_1991 · 31.08.2010, 22:01

TransformatoR,
А что вас не устраивает? Я писал код, полностью основываясь на вашем, переделал только команды и синтаксис.

Прошу прощения, не увидел, что предыдущее сообщение не мне...

@TransformatoR · 31.08.2010, 22:07 **[ТС]**

silent_1991,
Вот теперь всё работает, теперь буду разбираться. Спасибо большое!

Добавлено через 2 минуты
silent_1991,
Я писал это Maxwe11у, он нал мне ссылку на несколько другое решение, а вам я очень благодарен =)

@fasked · 01.09.2010, 08:35

Если интересно мои варианты решения
https://www.cyberforum.ru/post886258.html
https://www.cyberforum.ru/post886206.html

@TransformatoR · 01.09.2010, 10:07 **[ТС]**

Сообщение от fasked

Если интересно мои варианты решения
https://www.cyberforum.ru/post886258.html
https://www.cyberforum.ru/post886206.html

У меня почему-то не переводит римские в арабские..

Добавлено через 6 минут
И ещё я никак не могу додуматься, как сделать на Паскаль так, чтобы он выводил ошибку при неправильном вводе римского числа, а то он все числа переводит.

silent_1991 · 01.09.2010, 11:22

Что конкретно непонятно?

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Идентификация объектов на Box2D v3 - использование userData и событий коллизий 8Observer8 02.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-collision-events-sdl3-c. zip https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11680&d=1772460536 Одним из. . .	Реалии Hrethgir 01.03.2026 Нет, я не закончил до сих пор симулятор. Эта задача сложнее. Не получилось уйти в плавсостав, но оно и к лучшему, возможно. Точнее получалось - но сварщиком в палубную команду, а это значит, в моём. . .	Ритм жизни kumehtar 27.02.2026 Иногда приходится жить в ритме, где дел становится всё больше, а вовлечения в происходящее — всё меньше. Плотный график не даёт вниманию закрепиться ни на одном событии. Утро начинается с быстрых,. . .	SDL3 для Web (WebAssembly): Сборка библиотек: SDL3, Box2D, FreeType, SDL3_ttf, SDL3_mixer и SDL3_image из исходников с помощью CMake и Emscripten 8Observer8 27.02.2026 Недавно вышла версия 3. 4. 2 библиотеки SDL3. На странице официальной релиза доступны исходники, готовые DLL (для x86, x64, arm64), а также библиотеки для разработки под Android, MinGW и Visual Studio. . . .
SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами 8Observer8 20.02.2026 Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .	Конвертировать закладки radiotray-ng в m3u-плейлист damix 19.02.2026 Это можно сделать скриптом для PowerShell. Использование . \СonvertRadiotrayToM3U. ps1 <path_to_bookmarks. json> Рядом с файлом bookmarks. json появится файл bookmarks. m3u с результатом. # Check if. . .	Семь CDC на одном интерфейсе: 5 U[S]ARTов, 1 CAN и 1 SSI Eddy_Em 18.02.2026 Постепенно допиливаю свою "многоинтерфейсную плату". Выглядит вот так: https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=11617&stc=1&d=1771445347 Основана на STM32F303RBT6. На борту пять. . .	Камера Toupcam IUA500KMA Eddy_Em 12.02.2026 Т. к. у всяких "хикроботов" слишком уж мелкий пиксель, для подсмотра в ESPriF они вообще плохо годятся: уже 14 величину можно рассмотреть еле-еле лишь на экспозициях под 3 секунды (а то и больше),. . .

@TransformatoR 7 / 7 / 0 Регистрация: 31.08.2010 Сообщений: 131

	Римская система счисления. 31.08.2010, 21:12. Показов 3747. Ответов 21 Метки нет (Все метки) Всем здравствуйте! Очень нужна помощь в написании программы по переводу из римской системы счисления в арабскую на языке СИ. Я в этом почти ничего не понимаю. Заранее спасибо! 0

@rrrFer Заблокирован
	31.08.2010, 21:20
	чем помочь? 0

silent_1991 5058 / 3118 / 271 Регистрация: 11.11.2009 Сообщений: 7,044
	31.08.2010, 21:28
	TransformatoR, У вас есть идеи по решению задачи? 0

@TransformatoR 7 / 7 / 0 Регистрация: 31.08.2010 Сообщений: 131
	31.08.2010, 21:31 [ТС]
	В Pascal я это сделалс помошью оператора Case. Однако, здесь его, похоже, нету... По-этому, я не имею даже малейшего понятия 0

silent_1991 5058 / 3118 / 271 Регистрация: 11.11.2009 Сообщений: 7,044
	31.08.2010, 21:31
	В си есть оператор case. Но даже не будь его, можно было бы обойтись и if-else. 0

@TransformatoR 7 / 7 / 0 Регистрация: 31.08.2010 Сообщений: 131
	31.08.2010, 21:35 [ТС]
	Малость перепутал... С помощью for to do, однако, на СИ я не знаю даже элементарных команд.. 0

silent_1991 5058 / 3118 / 271 Регистрация: 11.11.2009 Сообщений: 7,044
	31.08.2010, 21:35
	Давайте код на паскале 0

Jupiter Каратель 6610 / 4029 / 401 Регистрация: 26.03.2010 Сообщений: 9,273 Записей в блоге: 1
	31.08.2010, 21:36
	TransformatoR, смотри здесь и пределывай)) 0

Jupiter Каратель 6610 / 4029 / 401 Регистрация: 26.03.2010 Сообщений: 9,273 Записей в блоге: 1
	31.08.2010, 21:50
	TransformatoR, смотри https://www.cyberforum.ru/cpp-... post886087 418-й пост 0

@TransformatoR 7 / 7 / 0 Регистрация: 31.08.2010 Сообщений: 131
	31.08.2010, 21:57 [ТС]
	silent_1991 Что значит эта строчка: for (i = 0, c = 0, n = 0; i < strlen(s); i++) Она почему-то не компилируется 0

silent_1991 5058 / 3118 / 271 Регистрация: 11.11.2009 Сообщений: 7,044
	31.08.2010, 21:59
	TransformatoR, Попробуй в самом начале, где строки #include ..., написать #include <string.h> 0

@TransformatoR 7 / 7 / 0 Регистрация: 31.08.2010 Сообщений: 131
	31.08.2010, 22:00 [ТС]
	Maxwe11, Что-то я просмотрел.. Действительно, однако мне нужно, что структура решения была схожа с примером на Pascal, приведённым выше. 0

silent_1991 5058 / 3118 / 271 Регистрация: 11.11.2009 Сообщений: 7,044
	31.08.2010, 22:01
	TransformatoR, А что вас не устраивает? Я писал код, полностью основываясь на вашем, переделал только команды и синтаксис. Прошу прощения, не увидел, что предыдущее сообщение не мне... 0

@TransformatoR 7 / 7 / 0 Регистрация: 31.08.2010 Сообщений: 131
	31.08.2010, 22:07 [ТС]
	silent_1991, Вот теперь всё работает, теперь буду разбираться. Спасибо большое! Добавлено через 2 минуты silent_1991, Я писал это Maxwe11у, он нал мне ссылку на несколько другое решение, а вам я очень благодарен =) 0

@fasked 5045 / 2624 / 241 Регистрация: 07.10.2009 Сообщений: 4,310 Записей в блоге: 5
	01.09.2010, 08:35
	Если интересно мои варианты решения https://www.cyberforum.ru/post886258.html https://www.cyberforum.ru/post886206.html 0

silent_1991 5058 / 3118 / 271 Регистрация: 11.11.2009 Сообщений: 7,044
	01.09.2010, 11:22
	Что конкретно непонятно? 0