N = 31
c = 1
For b=1 to n
If массив(b) > массив(i) then
If массив(b) > c then
c = a(b)
c2 = a(b-1)
End if
End if
Next
MsgBox c & " " c2
Написано на VBS
1байт = 256 значений. от 0 до 255
значит N = 255 здесь
В вопросе скорей всего ошибка.
Наверно имеется ввиду 1 пиксель, а не бит.
Глубина цвета = 32 бита, значит 1 пиксель кодируется 32 битами
32 бита=4 байта