1 байт = 8 бит;
128 бит = 16 байт;
10 Мегабайт = 10485760 байт;
1024 байт = 1 Килобайт;
Пытаемся подобрать код, начиная с наименьшей длины.
Коды длины 1.
Е = 0: нет однозначности, 0101 = ОО = ЕТ
Е = 1: нет однозначности, 101 = Т = ЕО
Коды длины 2.
Е = 00: ок, получился префиксный код, про который известно, что он допускает однозначное декодирование.
Е = 01: совпадает с О
Е = 10: нет однозначности, 101101 = ТТ = ЕЛО
Е = 11: совпадает с Л.
Таким образом, есть единственный ответ 00.
===== PascalABC.NET =====
begin
var Y := ReadInteger('Y =');
if Y in Range(10, 99) then
Println(Y + 18)
end.
Program Pr1;
uses crt;
var n,i,a,b,c:integer;
Begin
clrscr;
writeln('Vvedite N');
readln(n);
a:=n;
for i:=2 to 4 do begin
a:=a+10;
n:=n+a;
end;
writeln(n);
end.