составить программу Паскаль для y=x2+7f. Это х в квадрате. Очень нужна оценка по информатике

Const nmax=20;
var a: array [1..nmax+1] of byte;
n, j, i: byte;
x: integer;
begin
     repeat
          write('Количество элементов, не более ', nmax, ', n=');
           readln(n);
     until n in [1..nmax];
     for i:=1 to n do a[i]:=random(21);
     writeln('Исходный массив');
     for i:=1 to n do write(a[i]:4);
     writeln;
     i := 1;
     while (a[i] mod 5<>0) and (i<n) do inc(i);
     if (i<n) or ((i=n) and (a[i] mod 5=0)) then
     begin
          write('x=');
          readln(x);
          for j:=n downto i+1 do a[j+1]:=a[j];
          a[i+1]:=x;
          inc(n);
     end
      else
           writeln('Нет элемента с заданными свойствами');
     writeln('Преобразованный массив');
     for i:=1 to n do write(a[i]:4);
     writeln;
     readln;
end.

Что надо знать? 
Единицы измерения информации 
В 1 бит можно записать один двоичный символ.
1 байт = 8 бит
В кодировке ASCII в один байт можно записать один 256 символьный код
В кодировке UNICODE один 256 символьный код занимает в памяти два байта
1 килобайт = 1024 байт
1 мегабайт = 1024 килобайт
1 гигабайт = 1024 мегабайт
1 терабайт = 1024 гигабайт
Формула Хартли 2 i = N где i- количество информации в битах, N - неопределенность
Таблица степеней двойки, которая показывает сколько информации можно закодировать с бит 

i012345678910N=2 i12481632641282565121024

Чтобы вычислить информационный объем сообщения надо количество символов умножить на число бит, которое требуется для хранения одного символа 

Например: двоичный текст 01010111 занимает в памяти 8 бит 
Этот же текст в кодировке ASCII занимает 8 байт или 64 бита 
Этот же текст в кодировке UNICODE занимает 16 байт или 128 бит. 

Не забывайте, что пробелы надо тоже считать за символы поскольку они также набираются на клавиатуре и хранятся в памяти. 

Мощность алфавита - это количество символов в алфавите или неопределенность из формулы Хартли. 

Информационный вес одного символа - это значение i из формулы Хартли.

Отсюда можно сделать вывод, что не существует алфавита, состоящего из одного символа, поскольку тогда информационный вес этого символа был бы равен 0.