ф. Какой информационный объём потребуется для сохранения 2 минут
видео на экране монитора с разрешением 800 x 600 и палитрой на 128
ветов
1) 23071 Кбайт
2) 23071 Мбайт
3) 24000 Кбайт
4)144 Мбайт
с решением

Const n=6; m=8;
var 
a:array[1..n,1..m] of integer;
i,j,max,min,s:integer;
begin
Randomize;
writeln('Исходный массив:');
for i:=1 to n do
 begin
 for j:=1 to m do
  begin
   a[i,j]:=random(51)-25;
   write(a[i,j]:4);
  end;
  writeln;
 end;
max:=abs(a[1,1]); min:=abs(a[1,1]); s:=0;
for i:=1 to n do
 for j:=1 to m do
  begin
  if a[i,j]>0 then s:=s+a[i,j];
  if abs(a[i,j])>max then max:=abs(a[i,j]);
  if abs(a[i,j])<min then min:=abs(a[i,j]);
  end;
writeln('s = ',s,' max = ',max,' min = ',min);
writeln('s - max * min = ',s-max*min);
end.

Пример:
Исходный массив:
 -10   4   9 -21   9  24  24 -24
 -23 -21  21  24 -18 -15  14  -8
   2 -23 -17   5  17  -8 -10 -16
 -22  -9   6 -21   3 -13  18  13
  -8  -3 -25  -6  -2   8  14  25
 -19 -10  22  -1  -6 -20  -5 -17
s = 262 max = 25 min = 1
s - max * min = 237

Для начала надо найти i - (сколько весит 1 символ) по формуле N=2^i
Нам дано N - (мощность алфавита) 8 и 16 , эти числа подставляем по формуле получиться.
8=2^3 значит здесь i=3 (Если не понятно как я нашел это число, я просто умножал 2×2×2 получил 8 и сколько 2 потребовалось это есть число i)
16=2^4 значит здесь i=4
Дальше нам дано то что в сообщениях было по 25 знаков.
Теперь чтобы найти Iобьем 2 сообщений[1-Каюмба ;2-Гаюмба] нужно (i×кол.знаков) т.е
I1=3×25=75 бит
I2=4×25=100 бит
И здесь ясно то что 2 сообщение информативнее , а чтобы найти на сколько бит больше , надо 100-75=25бит 
ответ:Сообщение Гаюмбы инфоормативнее на 25 бит.