?>
1. Что, означает запись: глубина цвета 12 бит? Сколько цветов содержит палитра с данной, глубиной кодирования цвета. 2. Растровый графический файл содержит цветное, изображение с палитрой из 512 цветов, размером 20 х 30 пикселей. Каков, информационный объем этого файла в Байтах?3. Для хранения растрового изображения, размером 128х128 пикселей используется 4, Кбайт памяти. Каково число цветов в палитре изображения?4. Число цветов в палитре изображения -16, размер - 640*400 пикселей. Сколько изображений можно, закодировать 1250 Кбайтах?
Ответы
begin
var n := 25;
var M := ArrRandom(n, -50, 50);
M.Println; // исходный массив
// пузырьковая сортировка
for var i := n - 2 downto 0 do
for var j := 0 to i do
if M[j] > M[j + 1] then Swap(M[j], M[j + 1]);
M.Println; // отсортированный массив
var C := ReadInteger('Значение удаляемого элемента:');
var p := M.BinarySearch(C);
if p >= 0 then
begin
M := (M?[:p] + M?[p + 1:]).ToArray;
M.Println; // результат
end
else Println('Элемент не найден')
end.