Какой информационный объем пословицы, если она набрана в кодировке КОИ-8: UNICODE ответ дайте в байтах С книгой поведешься - ума наберешься

Program Turashova_Anna;

Const  V: String = '01';  
Function DecToN(A: Longint; D: Byte) : String; 
Begin  If A > D - 1  
then DecToN := DecToN(A div D, D) + V[(A mod D) + 1] 
else DecToN := V [A + 1]; 
end;    

Function NToDec(A: String; D: Byte): Longint;   
Begin   
If Length(a) > 0    
then NToDec := Pos(A [Length(A)], V) - 1 + D * NToDec(Copy (A, 1, Length(A) - 1), D)   
else NToDec := 0;   
end;

Var F: String;     
Begin     
Write('Входной файл Input.txt: '); Readln(F); 
If NToDec(F,2)      
mod 7 = 0      
then Writeln('Выходной файл Output.txt: 0',DecToN(NToDec(F,2) div 7,2))      
else Writeln('Выходной файл Output.txt: 0');     
end.

Так все задачки практически одинаковые.

1. Если мощность алфавита 32, значит для записи одного символа используется 5 бит (. 100 знаков по 5 бит = 100*5=500 бит = 500/8 байт = 62,5 байта = 62.5/1024 КБайт = примерно 0,06 КБайт

2. Если мощность алфавита 64, значит для записи одного символа используют 6 бит. 15 смв = 15*6 бит = 90 бит = 11,25 байт

3. мощность 32, символов 70, значит длина сообщения 70*5=350 бит
мощность 64, символов 60, значит длина сообщения 60*6=360 бит
350 < 360 ежличо

4. При мощности 256 для записи символа используют 8 бит.
8 бит * 64 символа * 32 строки = 2^3 * 2^6 * 2^5 = 2^(3+6+5)=2^14 бит = 2^11 байт = 2^1 КБайта
Текст из 20 КБайт по 2 КБайта на страницу занимает 10 страниц.