Считая, что каждый символ кодируется одним байтом, оцените информационный объем следующего предложения: «мой дядя самых честных правил»

Как считаю я ответ 25 байтов.

Const Sz = 1000; var   a: array [1..Sz] of integer;  a1: array [1..Sz] of integer;  a2: array [1..Sz] of integer;  a3: array [1..Sz] of integer;  M: integer;  N: integer;  i: integer;  k: integer;begin  read(M);  readln(N);  for k:=1 to N do begin    read(a[i]);    readln(a1[i]);    if (a[i]<>0) then a3[i]:=1 else a3[i]:=0;    end;  for k:=1 to N do begin  if(a3[i]<>0) then begin  for i:=1 to i do begin  if(a3[k]=0) then d[i]:=1;  if (a2[k]=i) then d[k]:=0;   end;   writeln(a3[i])  end;end;end.
вроде так

⌐A & ⌐(⌐A ∨ ⌐B) = ⌐A & (⌐⌐A & ⌐⌐B) = ⌐A & (A & B) = (⌐A & A) & B = 0 & B = 0

⌐(⌐A ∨ ⌐B) = ⌐⌐A & ⌐⌐B   (правило де Моргана для ИЛИ)

⌐⌐A = A   (закон двойного отрицания)

⌐⌐B = B   (закон двойного отрицания)

⌐A & (A & B) =  (⌐A & A) & B   (сочетательный закон для И)

(⌐A & A) = 0   (операция переменной с её инверсией для И)

0 & B = 0   (операция с константой для И)

отрицание (НЕ, ⌐, черта над буквой)

конъюнкция (И, &, ∧)

дизъюнкция (ИЛИ, ∨)

Объяснение: