В произвольном растровом изображении размеров 576x528 было использовано 250 цветов. При хранении изображения - id1690481720230325 от dgfhdhdj95 25.03.2023 08:17

Question

Информатика: В произвольном растровом изображении размеров 576x528 было использовано 250 цветов. При хранении изображения код цвета каждого пикселя записывается как двоичное число. Для хранения кода каждого пикселя выделено одинаковое количество бит. Сжатие данных не производится. Какое минимальное количество Кбайт памяти может быть отведено для хранения такого изображения?

dgfhdhdj95 · Accepted Answer

Const
n=10;
var
A: array[1..n] of integer;
B:array[1..n] of integer;
  i: integer;
sum: integer;
begin
{Заполнение массивов случайными числами}
randomize;
for i:=1 to n do begin
  A[i]:=random(100)-50;
  B[i]:=random(100)-50; {или B[i]=A[i];, если значения массива B должны совпадать со значениями массива A }
end;
{Поиск суммы отрицательных элементов}
sum:=0;
for i:=1 to n do
if A[i]<0 then sum:=sum+A[i];
{Замена нулевых элементов массива B на полученную сумму}
for i:=1 to n do
if B[i]=0 then B[i]:=sum;
{Вывод значений массива A}
writeln('массив A');
for i:=1 to n do
write(A[i],',');
writeln('');
writeln('Массив B');
{Вывод значений массива B}
for i:=1 to n do
write(B[i],',');

{Ожидание нажатия клавиши return от пользователя.}
readln;
end.

MOGZ ответил