Задача 3. Дано число X. Требуется перевести это число в римскую систему счисления....

Question

Задача 3. Дано число X. Требуется перевести это число в римскую систему счисления. Входные данные: Дано число X в десятичной системе счисления (1 ≤ X ≤ 100). Выходные данные: Выведите X в римской системе счисления. Пример: Входные данные: 19 Выходные данные: XIX На Python'e написать код

Answer 1

Ответ:

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

const

Rom:array[1..9] of string[2] =('I','IV','V','IX','X','XL','L','XC','C');

Arb:array[1..9] of integer =(1,4,5,9,10,40,50,90,100);

var rm: string;

ar,i:integer;

begin

clrscr;

repeat

write('Введите натуральное число от 1 до 100 ar=');

readln(ar);

until ar in [1..100];

rm:='';

for i:=9 downto 1 do

while (ar>=Arb[i]) do

begin

ar:=ar-Arb[i];

rm:=rm+Rom[i];