Uses crt;
const n=10;
var a:array [1..n] of integer;
i,k: integer;
begin
randomize;
for i:=1 to n do
begin
a[i]:=random(100);
writeln(a[i]);
end;
writeln;
for i:=1 to n-1 do
begin
if abs(a[i])=abs(a[i+1])
then
begin
if ((a[i]>0) and (a[i+1]<0)) or ((a[i]<0) and (a[i+1]>0))
then
inc(k);
end;
end;
writeln(k);
end.
По коду голубого цвета определяем, что для кодирования цвета одной точки используется 4 бита.
125 Кбайт = 125*1024 байт = 125*1024*8 бит
Количество точек изображения = 125*1024*8 / 4 = 256000
500*512 = 256000
640*200 = 128000
320*400 = 128000
512*400 = 204800
Ответ: А)500*512