Используя «тарабарскую грамоту», зашифруй слово ТЕКСТ!

program raf105;

var  

 white,blue,red,x,y,z: integer;

 w,b,r: boolean;

begin

writeln('Ввод:');

readln(white, blue, red, x, y, z);

repeat

 w:= false;

 b:= false;

 r:= false;

 if white >= x

   then begin

     white-= x;

     blue+= 1;

   end

   else w:= true;

 if blue >= y

   then begin

     blue-= y;

     red+= 1;

   end

   else b:= true;

 if red >= z

   then begin

     red-= z;

     white+= 1;

   end

   else r:= true;

until w and b and r;

writeln('Вывод:');

writeln(white,' ', blue,' ', red);

end.

320 символов в тексте

Объяснение:

Дано:

N = 64 символа

I = 240 байт = 240 * 8 = 1 920 бит (1 байт = 8 бит)

Найти:

K

N = 2^i где

N - мощность алфавита (количество символов в алфавите)

i - количество бит для кодирования 1 символа (информационный вес символа)

^ - знак степени

64 = 2^i

i = 6 бит (подбор, знание степеней двойки)

I = К * i где

I - информационный объём текста

K - количество символов в тексте

i - количество бит для кодирования 1 символа (информационный вес символа)

K = I / i

K = 1920 / 6 = 320 символов