Вычислите информационный объем 16-тицветной фотографии размера 4×6 см.

4х6 см = 40х60 мм
Если принять, что размер одного пикселя равен 1/3 мм, то количество пикселей в фотографии = (40/(1/3))*(60/(1/3)) = 40*3*60*3 = 21600
Для кодирования одного из 16 цветов требуется log(2)16 = 4 бита (2^4=16).
Информационный объем фотографии = 21600*4 бит = 21600*4/8 байт = 10800 байт = 10800/1024 Кбайт ≈ 10,55 Кбайт

Язык Pascal
    uses
      crt;
    var
      cs1,cs2,res,change:integer;
      TD:string;
    function FromDec(n,r:longint):string;
    var
      s:String;
    const
      digit:string[16]='0123456789ABCDEF';
    begin
      s:='';
      repeat
        s:=digit[(n mod r)+1]+s;
        n:=n div r;
      until n=0;
        FromDec:=s;
    end;
    function ToDec(n:string;r:longint):longint;
    var
      m,i:longint;
    const
      digit:string[16]='0123456789ABCDEF';
    begin
      m:=0;
      while n[1]='0' do
        delete(n,1,1);
      for i:=1 to length(n) do
        m:=m*r+pos(n[i],digit)-1;
      ToDec:=m;
    end;
    begin
      writeln('Введите из какой CC:');
      repeat
        readln(cs1);
      until
        (cs1>=2) and (cs1<=36);
      writeln('Введите число в соответствии с CC:');
      readln(TD);
      writeln('Введите в какую CC:');
      repeat
        readln(cs2);
      until
        (cs2>=2) and (cs2<=36);
      writeln('Перевод из ',cs1,' CC --> ',cs2,' CC:');
      writeln(FromDec(ToDec(TD,cs1),cs2));
    end.

#include <iostream>

#include <iterator>

#include <vector>

 

using namespace std;

 

int main() {

 int n = 5;

 int m = 6;

 

 vector<vector<int>> a(n, vector<int>(m));

 

 for (int i = 0; i < n; ++i) {

   for (int j = 0; j < m; ++j)

     cin >> a[i][j];

 }

 

 vector<double> ans(m);

 

 for (int i = 0, q = 0; i < m; ++i, ++q) {

   int sum = 0;

   int cnt = 0;

 

   for (int j = 0; j < n; ++j) {

     if (a[j][i] < 0) {

       sum += a[j][i];

       ++cnt;

     }

   }

 

   if (sum)

     ans[q] = sum / (double)cnt;

 }

 

 copy(ans.cbegin(), ans.cend(), ostream_iterator<double>(cout, " "));

}