)переведите числа из римской системы счисления в десятичную систему mcxlvii, mdcccxii, mcmxlv, mmxiv

М = 1000
D=500
С=100
L=50
Х=10
MCXLVII = 1000+100+40+7=1147
MDCCCXII = 1000+500+300+12=1812
MCMXLV =1000+900+40+5= 1945
MMXIV = 2000+10+4=2014
Явно зашифрованы знаменательные даты: 1147 г - первое упоминание о Москве
1812 - война с Наполеоном
1945 - победа в Великой Отечественной войне

2) Номер страницы
3) Библиотечный каталог — совокупность расположенных по опр-м правилам библиографических записей на документы, раскрывающих состав и содержание фонда библиотеки или информационного центра.
4) Жёсткий диск
5) Полное имя может включать следующее:
протокол или доступа
имя или адрес компьютера, узла сети
устройство хранения, диск
путь к каталогу 
собственно имя файла, которое может содержать его расширение
версия или номер ревизии
6) Область поиска - область памяти, в пределах которой осуществляется поиск

//PascalABC.NET
//Версия 3.3, сборка 1634 (14.02.2018)

1)
begin
  var a:=ArrRandom(ReadInteger('n='),20,79); a.Println;
  var x:=a.Where(t->t.IsEven).Count; 
  If x>0 then Println('Количество четных:',x) else Println('Четных нету');
  var y:=a.Where(t->t mod 10=6).Count; 
  If y>0 then Println('Количество оканч. на 6:',y) else Println('Оканч. на 6 нету');
end.

Пример:
n= 5
79 29 27 74 27
Количество четных: 1 
Оканч. на 6 нету 

2)
begin
  var a:=ArrRandom(10,0,100); a.Println;
  Println('Кол-во пар:',Range(0,8,2).Where(t->a[t]=a[t+1]).Count)
end.

Пример:
56 93 72 72 71 24 37 55 91 91
Кол-во пар: 2