Программисты !

60 , кто с лабораторной по информатике.
с++

Программа на языке Паскаль.

const N=30;
var i, s0, k, a: integer;
      b: array [1..N] of integer;
begin
      readln(a);
      s0:=0;
      k:=0;
      randomize;
      for i:=1 to N do
      begin b[i]:=random(20001)-10001; {чтобы диапазон случайных чисел был от -10000 до 10000}
                if (b[i]<0) then s0:=s0+b[i];
                if (b[i]>0) and (b[i]<=a) then inc(k);
      end;
      if (s0<>0) then writeln(s0, ' - сумма отрицательных чисел')
      else writeln('отрицательных чисел нет');
      if (k<>0) then writeln(k, ' - количество положительных чисел, не превосходящих числа А')
      else writeln('положительных чисел не превосходящих числа А, нет');
readln;
end.

1.
Формула:  I=Ki и N=2 ^{i} 
K =30 N=128 найти I
решение
N=  2 ^{i}  128 =2 ^{7}  i=7 бит
I =Ki =30•7 =210 бит
2.
l =Ki
N=  2^{i} 

I = объем информации

k = кол-во символов

i = минимальное кол-во бит для кодирования одного символа

N = мощность алфавита;

k = 64•256 = 16384

N= 32

i = ㏒_{2}  32 = 5 бит

I = 16384 • 5 = 81920 (бит) = 10240 (байт) = 10 Кбайт

ответ: 10 Кбайт

3.

0,5 Кбайта • 1024= 512 байта

4.

Извини, не могу решить, вроде решил а потом перерешил и неправильно, вот что есть уж пока:

На один символ - 1 байт

30 строк по 50 символов = 1500 символов

3 страницы - это 4500 символов

ответ: 4500 байт!