Чтобы можно было декодировать однозначно, должно соблюдаться условие Фано - ни один код символа не является началом другого.
10 не подходит, т.к. на 10 уже начинаются кодыкоды В и Д
00 не подходит, так как на 0 начинается А
Остаётся 11 для Г, на 11 никакой другой код не начинается.
Ответ 4
У тебя функция x^3+x^2 и перебор от 20 до 1, т.е. x^3+x^2 будет больше 22 при числах:
20, 19, 18, 17, 16, 15, 14, 13, 12, 11, 10, 9, 8, 7, 6, 5, 4, 3.
итого: 18 чисел
var
l,x,sum:real;
i:integer;
begin
write ('L = ');
readln(l);
write ('X = ');
readln(x);
i:=1;
sum:=0;
while i<=101 do
begin
sum:=sum+exp((x+i)*ln(l))/i;
i:=i+2;
end;
writeln ('Summa: ',sum);
readln;
end.
Var a: String;
sum,i: Integer;
begin
sum:=0;
writeln('Введите текст');
readln(a);
for i:=1 to Length(a) do
begin
if a[i]='а' then sum:=sum+1;
end;
writeln('Буква а встречается: ',sum,' раз(а)');
end.
Да это правда
:))))
Не за что помочь