Для хранения растрового изображения размером 128х128 пикселей отвели 4 кбайт памяти. каково максимально возможное число цветов в палитре изображения?

4*1024 = 4096 байт всего

128*128 = 16384 пикселей всего

16384 / 4096 = 4 пикселя хранят в 1 байте

1 байт = 8 бит

8 бит / 4 пикселя = 2 бита для хранения 1 пикселя, т.е.  только черно-белое изображение

program pr;

var mas: array[1..40] of integer;

i, sum: integer;

begin

randomize;

for i: =1 to 40 do mas[i]: =random(20);

for i: =1 to 40 do if mas[i]< =10 then sum: =sum+mas[i];

writeln ('сумма равна ', sum);

readln;

end.

программу проверил все работает

пщояк 17 27 16 33 17

нщёп 15 27 7 17