Var
i:integer;
s:string;
begin
readln(s);
for i:=1 to length(s) do
write(s[length(s)-i]);
end.
Я не знаю как кодируются русские буквы, но глядя на цифровую последовательность
1 2 1 2 1 3
225 242 225 242 225 244
тут всего 3 буквы получается
Буквы идут поочереди, только последняя отличается
т.е должно быть 3 разные буквы
я думаю это в) АРАРАТ
тут 3 буквы А, Р, Т
64 символа - это 6 бит на хранение каждого, т.к.
2^6 = 64
Всего симовлов 100
информационная ёмкость сообщения 6*100 = 600 бит
Числа должны быть целыми? Или полностью рандомные?