для расшифровки нужно применить обратный алгоритм
1) написать название животного
2) для первой буквы названия найти предыдущую по алфавиту
Животные: (некоторые подбирались исходя из ответа)
Улитка - Т
Бык - А
Лев - К
Енот - Д
Ёж - Е
Сова - Р
Зебра - Ж
Белка - А
Утка - Т
Эму - Ь
Ответ - Так держать
Var a,b:real;
begin
readln(a);
if frac(a)>0.5 then
b:=int(a)+1
else b:=int(a);
writeln(b);
end.
Мощность алфавита N вычисляется по формуле
, где i - это отводимое количество бит на символ. Тогда, 2⁵ = 32. Алфавит <=32 символов. Но и больше 16(т.к. 2⁴ = 16)
Программа на снимке, чтобы определить целое число от деление нужно использовать div