<u><em>15000 пикселей; 29,3 Кбайт=29,3*1024=30000 байт; 30000 / 15000=2 бита на пиксел; закодировать 4 цвета. я думаю так </em></u>
если в паскале то
var
n, i, sum, k : integer;
begin
read (n);
for i := 1 to n do
begin
read (k);
if k mod 15 = 0 then sum := sum + k;
end;
writeln (sum / n);
end.
40 * 50 * 256 = 512000 /8 = 64000 байт
40 * 50 * 16 = 32000 /8 = 4000 байт
40 * 50 * 2 = 32000 /8 = 500 байт
4 мин = 240 сек
256000*240= 61440000 бит за 4 мин
61440000 бит = 7680000 байт = 7500 Кбайт
var i,j:integer;
begin
for i := 1 to 4 do
begin
for j:= i to 4 do write ('3 ');
writeln
end
end.