Unicode и uri это правельный ответ
Путь к файлу не забудь поменять
var
t: text;
st: string;
s, i: integer;
c: char;
begin
s := 0;
st := '';
assign(t, 'ПУТЬ К ФАЙЛУ');
reset(t);
while not eof(t) do
begin
read(t, c);
if (ord(c) <> 13) then
st := st + c
else if TryStrToInt(st, i) then
begin
s := s + i;
st := '';
end
else
st := '';
end;
if TryStrToInt(st, i) then
s := s + i;
close(t);
writeln(s);
end.
Ууух. Ну... Тут, конечно, помог бы учебник и учитель, но я попытаюсь. Есть такая формула I = K* i. где I - вес сообщения, K - длина сообщения ( в символах) i количество информации, необходимое для кодировки одного символа. Неизвестно как получаем i? Читай дальше.
Формула i = I/K выводится из первой. Всё тоже самое.
N=2^i означает, что N вариантов можно закодировать с использованием 2^i информации. Где i - целое положительное число. Не понимаешь что значит i? Просто запомни эту и верхнюю формулу. Сможешь его найти, а уж понять... не так важно.
Надеюсь, что тебе известны приставки кило, мега, в это не вдаюсь.
Теперь к задачке. K будет равно количеству пикселей! Значит оно равно произведению строк на столбцы. Подставляем известный объём сообщения (2кб) и найденое кол-во символов(128*128) во вторую формулу. Теперь нам известно, каким кооличеством информации кодируется один символ. Говоря правильно, глубина цвета. Задача найти сколько всего возможно закодировать цветов. Вспомни формулу N=2^i и пойми, что нам необходимо найти именно N. N и есть максимально возможное кол-во цветов. Подставляем значения в формулу и находим.
P.S если цветов 2, то логично что это белый и чёрный цвет.
Может так как если у одного 1 яблоко то у второго будет на 6 больше и в сумме получится 7