Помогите определить макс кол цветов картинки 32x32 пикс объёмом 512 байт

[www_2008]

картинка имеет размер 32х32 пикселя, объем памяти выделенной картинки составляет 512 байт. определить максимальное количество цветов для этой картинки...заранее вам благодарны за ответ и уделенное время.

[www_2008]

Начинать с этого?

begin
if (Image2.Picture.Height <> 32) or (Image2.Picture.Width <> 32) then
begin
ShowMessage('Исходный рисунок не 32х32');
exit;

[www_2008]

var
MAnd, MXor, MOsn, MCol: array of Byte;
MPix, MOrg: array of TColor;
a, b, c, n, m: integer;
Bt, Bu, Indicator: Byte;
p: TColor;
k: boolean;
F: file;
LenOsn, LenXor, LenCol: integer;
begin
if (Image2.Picture.Height <> 32) or (Image2.Picture.Width <> 32) then
begin
ShowMessage('Исходный рисунок не 32х32');
exit;
end;
{Заполнение массивов MPix и MAnd}
{Активизация массивов}
SetLength(MPix, 1024);
SetLength(MAnd, 128);
{Установка счетчиков}
b := 0; //Счетчик битов
a := 0; //Счетчик пикселов картинки
c := 0; //Счетчик байтов маски MAnd
Bt := 0; //Формируемый байт маски MAnd
for m := 31 downto 0 do
for n := 0 to 31 do
begin
MPix[a] := Image2.Canvas.Pixels[n, m];
p := MPix[a];
if p = RGB(255, 255, 255) then
begin

или всё не так?

[Plague]

32*32=1024 пикселей
1024 = 2^10
но надо еще гдето хранить координаты точки (точек)
следовательно ответ 9 цветов.

[www_2008]

на самом деле все не так уж и страшно:
32х32=1024
512х8=4096
4096/1024=4 - глубина цвета
2^4=16
программка тупенькая получается на паскале,
возведение в степень - функцией нужно воспользоваться exp(...) и в диалоге вввести данные, пром переменные для размера картинки в битах и глибины цвета... и все