liliakolokol

24.01.2023 01:45 •  Информатика

//ПРОГРАММА ДЛЯ ПЕРЕВОДА АРАБСКИХ //ЧИСЕЛ В РИМСКИЕ

const

ROME: array[1..13] of string = ('M', 'CM', 'D', 'CD', 'C', 'XC', 'XL', 'X','IX' , 'V', 'IV','I');

ARABIC: array[1..13] of integer = (1000, 900, 500, 400, 100, 90, 50, 40, 10, 9, 5, 4, 1);

var

number: integer:=0;

number: string:=' ';

n: integer:=0;

ошибка:Program1.pas(11) :ROME: array[1..13] of string = ('M', 'CM', 'D', 'CD', 'C', 'XC', 'XL', 'X','IX' , 'V', 'IV','I'); - Встречен конец файла, а ожидался идентификатор

язык паскаль