0,5 Мбайт = 0,5*1024 Кбайт = 512 Кбайт = 512*1024 байт = 512*1024*8 бит
Память для одного пикселя = 512*1024*8 / (128*128) = 256 бит
Количество цветов = 2^256 (очень-очень много)
4. Для хранения цветовой палитры, содержащей 256 цветов, необходимо выделить 8 бит = 1 байт данных ( 2 ^ 8 = 256). Каждый цвет палитры будет кодировать бинарный код, состоящий из 8 разрядов.
Изображение размером 10 на 10 точек состоит из 10 * 10 = 100 пикселей.
Каждый пиксель изображения должен нести информацию о цвете, следовательно, для хранения всей картинки потребуется 8 * 100 = 800 бит = 100 байт.
Ответ: информационный объём изображения 800 бит (100 байт).
Var s,s1:string; p:integer;
begin
writeln('Введите строку:');
readln(s);
s1:=s+' ';
while s1<>'' do
begin
p:=pos(' ',s1);
if (p>1)and(s1[p-1]='я') then writeln(copy(s1,1,p-1));
delete(s1,1,p);
end;
<span>end.</span>
Var a: integer;
begin
a:=0;
for var i:=100 to 999 do
if (i mod 7=0) then
a:=a+1;
write(a);
end.