Объем видеопамяти
16 килобайт = 16 * 1024 = 16 384 байт
умножаем на 8 бит в байте = 131 072 бит
разрешение экрана
256*128 = 32 768 точек
делим объем памяти на кол-во пикселей
131 072 бит / 32 768 пиксель = 4 бита на пиксель
количество цветов определяем по формуле
2^кол-во бит = кол-во цветов
2^4 = 16 цветов
ответ - в палитре 16 цветов
Это значек обозначающий программу
/////////////////////////////////////
Const
N = 10;
Var
X:array[1..N] of integer;
i,k:integer;
S:real;
Begin
k:=0;
S:=0;
WriteLn('Введите массив A[',N,']:');
For i:= 1 to N do
Begin
Read(X[i]);
if X[i]>1 then k:=k+1
else if X[i]<0 then S:=S+X[i];
End;
WriteLn('k = ',k);
WriteLn('S = ',S);
End.