Jhfdjhegfjksfdsfdjkbgnbdkrngd/skfjns/rkjgnskdrbjhkdrhdtyjftukyuj
Адрес клетки это - координаты этой клетки
Var
number: integer;
k: integer;
begin
repeat
write('number = ');
readln(number);
if number < 0 then k := k + 1;
until number = 0;
writeln('Кол-во отрицательных = ', k);
end.
512*128=65536 пикселей
32 кб = 262144 бит
глубина цвета: 262144/<span>65536</span>=4 бит
2^4=16 цветов