Смотря сколько цветов. Если в Палитре 256 цветов, то 256 * 4 = 1024 бита памяти. Если не так то поправьте меня.
В1 номере 1 строка-10101011 253 171 AB
(в переводе помогает таблица система счислений)
100-(100/64)*2=96.8%
Ценность информации 96.8%
// PascalABC.NET 3.0, сборка 1160 от 05.02.2016
begin
SeqRandom(ReadInteger('n='),1,99).Println
end.
<u><em>Тестовое решение:</em></u>
n= 30
8 39 37 3 4 57 33 31 44 12 32 80 14 19 73 64 81 82 36 6 48 12 84 81 6 66 36 51 40 69
Если тебе вводить вручную,то в первом цикле сделай read(a[i,j]);