Форум программистов, компьютерный форум CyberForum.ru
Наши страницы

Записать число римскими цифрами - C++

Войти
Регистрация
Восстановить пароль
Другие темы раздела
C++ Отправка параметров программе из контекстного меню проводника http://www.cyberforum.ru/cpp-beginners/thread1066514.html
Здравствуйте))).Помогите пожалуйста решить один вопрос. Текст программы: #include <iostream> int main() { std::cout<<параметр_переданный_из_контекстного меню_проводника; return 0; }
C++ Простой пример из книги. Объяснить, почему код выдает такие результаты Коллеги, привожу простой пример из книги Страуструппа. #include <iostream.h> #include <conio.h> void f(int a){ while(a--){ static int n=0; http://www.cyberforum.ru/cpp-beginners/thread1066485.html
Структуры. Нахождение среднего значения. C++
помгите найти мреднее значение ругается на ii=((matemat+rus)/2); #include<math.h> #include<conio.h> //#include<iostream.h> #include<stdio.h> #include<stdlib.h> typedef struct studenent ...
Прием по modbus. Как указать число считываемых байтов C++
Добрый день. Пишу программу для обмена по modbus'у rtu , я slave , принимаю команды и формирую ответы на них. Принимаемые команды могут иметь различную длину в байтах . При чтении из COM порта с...
C++ Перегрузка функции, структура. Расстояние от точки, Периметр, Площадь треугольника и прямоугольника http://www.cyberforum.ru/cpp-beginners/thread1066384.html
Здравствуйте уважаемые форумчане. Помогите пожалуйста доделать задачу. Создать структуру POINT для хранения координат точки на плоскости. Функциональность расстояние от точки до центра координат....
C++ Определить размер структуры "вручную" есть структура struct table{ int nomer; string surname; string name; string otch; string adress; string poruch; string age; подробнее

Показать сообщение отдельно
kilsza
2 / 2 / 0
Регистрация: 09.01.2014
Сообщений: 10

Записать число римскими цифрами - C++

09.01.2014, 13:28. Просмотров 2044. Ответов 4
Метки (Все метки)

Ребята, прошу помощи, больше некуда обратиться, помогите в написании программы.

Для записи римскими цифрами используются символы I, V, X, L, C, D, M, обозначающие соответственно числа 1, 5, 10, 50,100, 500, 1000. Составить программу, которая запись любого числа, меньшего 4000 арабскими цифрами переводила бы в запись римскими цифрами.

буду очень благодарен. есть подобное на паскале


Pascal
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
Uses crt;
 
const
 
{римские цифры}
RomeDigits: array [1..13] of string[2] =
('I', 'IV', 'V', 'IX', 'X', 'XL', 'L', 'XC', 'C', 'CD', 'D', 'CM', 'M');
 
{числа, соответствующие римским цифрам}
ArabicNumbers: array [1..13] of integer =
(1, 4, 5, 9, 10, 40, 50, 90, 100, 400, 500, 900, 1000);
var
arabic: integer; {арабское число}
 
{Функция перевода арабского числа в римское}
function ArabicToRome (n: integer): string;
var
i: integer;
res: string;
begin
res:='';
i:=13; {проверяем от больших чисел к меньшим}
while n>0 do begin
{находим следующее число, из которого будем формировать римскую цифру}
   while ArabicNumbers[i]>n do
   i:=i-1;
   res:=res+RomeDigits[i];
   n:=n-ArabicNumbers[i];
   end;
ArabicToRome := res;
end;
 
{основная программа}
begin
write('Введите арабское число: ');
readln(arabic);
writeln('Римская запись = ',ArabicToRome(arabic));
readln;
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
 
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2017, vBulletin Solutions, Inc.
Рейтинг@Mail.ru