Вычисляем по формулам:
N = 2^b
I = k*b
Где N - мощность алфавита, b - инф. вес символов, k - количество символов
Отсюда,
128 = 2^b
b = 6
12 кб = 98304 бит
98304 = k * 6
k = 16384
ᅠᅠᅠᅠᅠᅠᅠᅠᅠᅠᅠᅠᅠᅠᅠᅠᅠᅠᅠᅠᅠᅠᅠᅠᅠᅠᅠᅠᅠᅠᅠᅠᅠ
В 1832 году ..............
Var a:integer;
begin
write('a= '); readln(a);
writeln('Ploschad= ',sqr(a))
end.
%.2f это разьем с плавающей (float<span>) точкой, и после точки надо оставить два десятичных знака. != эт "не равно".</span>