Всколько бит понадобится для кодирования рисунка на экране, которыйсостоит по горизонтали из1280 точек, по вертикали из1024 точек?

Визвестных мне основных палитрах:

Ответ: 32 (1+2+2+2+2+2)*2+2 (1+2+2+2+2)*2+2+2+2 (1+2+2+2)*2+2+2+2+2+2 (1+2+2)*2+2+2+2+2+2+2+2 ((1+2+2)*2+2)*2 ((1+2+2)*2)*2+2+2 (1+2)*2+2+2+2+2+2+2+2+2+2 ((1+2)*2+2+2+2)*2 ((1+2)*2+2+2)*2+2+2 ((1+2)*2+2)*2+2+2+2+2 ((1+2)*2)*2+2+2+2+2+2+2 +2)*2)*2)*2 (1)*2+2+2+2+2+2+2+2+2+2+2+2 ((1)*2+2+2+2+2+2)*2 ((1)*2+2+2+2+2)*2+2+2 ((1)*2+2+2+2)*2+2+2+2+2 ((1)*2+2+2)*2+2+2+2+2+2+2 )*2+2+2)*2)*2 ((1)*2+2)*2+2+2+2+2+2+2+2+2 )*2+2)*2+2+2)*2 )*2+2)*2+2)*2+2+2 )*2+2)*2)*2+2+2+2+2 ((1)*2)*2+2+2+2+2+2+2+2+2+2+2 )*2)*2+2+2+2+2)*2 )*2)*2+2+2+2)*2+2+2 )*2)*2+2+2)*2+2+2+2+2 )*2)*2+2)*2+2+2+2+2+2+2 )*2)*2+2)*2)*2 )*2)*2)*2+2+2+2+2+2+2+2+2 )*2)*2)*2+2+2)*2 )*2)*2)*2+2)*2+2+2 )*2)*2)*2)*2+2+2+2+2 var n : integer; procedure gogo(a : integer; s : string); begin   if a< =24 then       if a=24 then       begin           inc(n);           writeln(s);       end           else           begin               gogo(a+2,s+'+2');               gogo(a*2,'('+s+')*2');           end; end; begin   n: =0;   gogo(1,'1');   writeln('n = ',n); end.

Исходя из самого вопроса - тут не важно само выражение функции. 1. 7   { -6, -4, -2, 0, 2, 4, 6 } var k,n : real; begin   n: =0;   k: =-6;   while k< =6 do   begin       k: =k+2;       n: =n+1;   end;   writeln('n = ',n); end. 2. 7    { -2, -1.5, -1, -0.5, 0, 0.5, 1 } var k,n : real; begin   n: =0;   k: =-2;   while k< =1 do   begin       k: =k+0.5;       n: =n+1;   end;   writeln('n = ',n); end. 3. 3   { -3, -1, 1 } var k,n : real; begin   n: =0;   k: =-3;   while k< =2 do   begin       k: =k+2;       n: =n+1;   end;   writeln('n = ',n); end. 4. 7 { -1, -0.5, 0, 0.5, 1, 1.5, 2 } var k,n : real; begin   n: =0;   k: =-1;   while k< =2 do   begin       k: =k+0.5;       n: =n+1;   end;   writeln('n = ',n); end.