Напишите код случайных чисел от 5 до 17, на языке паскаля

Для количественного измерения информации введено понятие количество информации (i) 
Одно из понятий количества информации это мера уменьшения неопределенности  знания 
Измеряется эта величина в битах. Формула  N=2^i  
где N - количество возможных событий (вариантов)
Например, игра Крестики-нолики (на поле 8х8) . После первого хода первым игроком второй игрок имеет 6 бит информации (всего 64 поля   2^i=64 отсюда i=6 то есть 6 бит)
Шестнадцатеричная система имеет 16 знаков (в ней применяются 0 1 2 3 4 5 6 7 8 9 0 А B C D E F)  2^i=16  отсюда  i=4 бит (такое количество информации содержит один разряд 16-ричного числа (например 123А77F?67 вместо знака вопроса какую цифру можно поставить в этой системе? любую из 16 -ти знаков это 4 бита )
Аналогичный вопрос для двоичной системы (в двоичной системе  число состоит из  нулей и единиц (какая цифра стоит на таком-то месте (ОДНА из двух) i=1 бит 
по формуле N=2^i   N=2  2^i=2    i=1 бит
Для восьмеричной системы i=3 бит

// PascalABC.NET 3.1, сборка 1230 от 27.04.2016
begin
  var s:=ReadLines('in.txt').ToArray;
  var n:=StrToInt(s[0]);
  var a:=s[1].ToWords.Select(e->StrToInt(e)).ToArray;
  var f:=OpenWrite('out.txt');
  Writeln(f,n,' - (кол-во чисел)');
  foreach var e in a do Write(f,e,' '); Writeln(f);
  Writeln(f,'Среднее значение четных ',
    a.Where(x->x.IsEven).Average);
  Writeln(f,'Среднее значение нечетных ',
    a.Where(x->x.IsOdd).Average);
  f.Close
end.

Файлы in.txt и out.txt находятся во вложении.

Содержимое файла out.txt:
15 - (кол-во чисел)
-22 49 33 47 -10 -1 20 -18 2 21 2 -25 21 -47 -36
Среднее значение четных -8.85714285714286
Среднее значение нечетных 12.25