Сколько цветов можно максимально использовать для хранения изображения размером 350х200 пикселей, если объем страницы видеопамяти - 65 кбайт?

350*200 = 70000 пикселей в изображении 65*1024*8 =  532480 бит информации 532480/70000 =  7,6 бит на пиксель, так как не целого бита не бывает округляем в меньшую сторону 7 бит цветов

+  0   1  2  3  4  5      6        7 0   0   1   2   3   4   5     6     7 1   1   2   3   4   5   6     7     10 2   2   3   4   5   6   7   10   11 3   3   4   5   6   7 10   11   12 4   4   5   6   7 10 11 12   13 5   5   6   7 10 11 12 13   14 6   6   7 10 11 12 13 14 15 7   7 10 11 12 13 14 15 16 12+ 34 46   77 +   11 110 777 - 137 640

//pascalabc.net версия 3.2, сборка 1389 //если программа не запускается, то обновите версию uses graphabc; const       kegl = 40; var       space, line: integer; procedure m(cx, cy: integer); begin       moveto(cx, cy);       lineto(cx, cy - kegl );       lineto(cx + kegl div 2, cy);       lineto(cx + kegl, cy - kegl);       lineto(cx + kegl, cy); end; procedure i(cx, cy: integer); begin       moveto(cx, cy - kegl);       lineto(cx, cy );       lineto(cx + kegl, cy - kegl);       lineto(cx + kegl, cy); end; procedure r(cx, cy: integer); begin       moveto(cx, cy);       lineto(cx, cy - kegl);       lineto(cx + kegl, cy - kegl);       lineto(cx + kegl, cy - kegl div 2);       lineto(cx, cy - kegl div 2); end; begin       space : = kegl div 2;             setwindowsize(4 * space + 3 * kegl, 4 * space + 3 * kegl );             line : = space + kegl;       m(space, line );       i(2 * space + kegl, line );       r(3 * space + 2 * kegl, line );             line : = 2 * space + 2 * kegl;       r(space, line );       i(2 * space + kegl, line );       m(3 * space + 2 * kegl, line );             line : = 3 * space + 3 * kegl;       m(space, line );       i(2 * space + kegl, line );       m(3 * space + 2 * kegl, line ); end.