K=64*64=4096 пикс
N=4;
N=2^i; 4=2^2 => i=2 бит на пикс
I=k*i=4096*2=8192 бит
Ответ: 8192 бит
Const
n = 5;
var
a: array [0..n-1] of shortint;
i: byte;
begin
randomize;
writeln ('Сформированный массив: ');
for i:=0 to n-1 do
begin
a[i]:=random (51);
write (a[i], '; ');
end;
end.
//PascalABC.NET (версия 3.1, сборка 1198 от 11.03.2016)
begin
for var i:=30 downto 10 do println(i);
end.
Надо сложить все элементы массива в цикле, тогда получишь искомое)