В компьютерной технике для кодировки символов используют колеровочные таблицы unicode и ascll. A) Автоматическое устройство осуществило перекодировку информационного сообщения, первоначально записанного в коде unicode, в кодировку ascll . При этом информационное сообщение уменьшилось на 1200 бит. Посчитайте длину сообщения в символах.
B) При кодировке текстового сообщения, состоящего из 80 символов, потребовать 649, а при дальнейшем изменение кодировки на другую его итоговый объем составил 660 байт. Какое преобразование кодировок производилась ?

n, x = map(int, input().split())

array = ['0'] + list(i for i in range(1, n+1))

while array[1] != x:

   if array.index(x) % 2 == 0:

       for g in range(1, len(array)):

           if g % 2 != 0:

               array[g] = ''

       print("стереть все числа, стоящие на нечётных позициях")

   else:

       for g in range(1, len(array)):

           if g % 2 == 0:

               array[g] = ''

       print("стереть все числа, стоящие на чётных позициях")

   array = list(filter(bool, array))

//Pascal ABC.NET v3.0 сборка 1111

Const
 n=5;

Var
 ma:array[1..n,1..n] of integer;
 i,j:integer;
begin
 writeln('Matrix reading...');
 for i:=1 to n do
  begin
   writeln;
    for j:=1 to n do
      readln(ma[i,j]);
  end;
 writeln('First matrix:');
 for i:=1 to n do
  begin
   writeln;
    for j:=1 to n do
     begin
      write(ma[i,j]:4);
      if (ma[i,j]<-8) or (ma[i,j]>6) then ma[i,j]:=sqr(ma[i,j]);
     end;
  end;
 writeln;
 writeln('Final matrix:');
 for i:=1 to n do
  begin
   writeln;
    for j:=1 to n do
     write(ma[i,j]:4);
  end;
end.

Пример ввода:
1
2
3
4
5

6
7
8
9
1

2
3
4
5
6

7
8
9
1
2

3
4
5
6
7
Пример вывода:
First matrix:
   1   2   3   4   5
   6   7   8   9   1
   2   3   4   5   6
   7   8   9   1   2
   3   4   5   6   7
Final matrix:
   1   2   3   4   5
   6  49  64  81   1
   2   3   4   5   6
  49  64  81   1   2
   3   4   5   6  49