Як називається інформаційне середовище, яке створює навколо себе людина для власних навчальних потреб?

1)в сообщении было 2048 = 2^11 символовобъем сообщения 2Кбайт = 2*1024*8 = 2^14 бита        (= 16384 бита)место, отведенное на 1 символ:2^14 бита / 2^11 символов = 2^3 бита на символ = 8 бита на символ8 бита на символ позволяют закодировать 2^8 = 256разных символов поэтому мощность алфавита – 256 символов
2))v=1/512Мбайт=1/512*1024*1024*8бит=16384бит
i=16384/4096бит=4бит
N=2^4=16cимволов
ответ:16символов
3)N - мощность алфавитаI - информационный объем сообщенияi - информационный объем одного символа N=2^i Найдем i:1/16 кб = 2^13/2^4 бит = 2^9 бит i=2^9/(256*2)=2^9/2^9=1 бит N=2^i=2^1=2 символа. 
4)16=2 в степени 4, т.е. 
1 символ = 4 бита 
384*4=1536 бит = 1536/8 = 192 байт = 192/1024= 0,1875 Кб
5)2^i=N, N = 162^i=16i=4 бит50 * 4 = 200 бит200: 8 = 25 байт

Маловато за такую задачку.

Var z:array[1..16] of integer; k:array[1..16] of real; i,p,s:integer; max:real;
Begin
 randomize;
 for i:=1 to 16 do z[i]:=random(101);
 write('Z=');
 for i:=1 to 16 do write(z[i],' ');
 writeln;
 writeln;
 p:=0;
 s:=0;
 for i:=1 to 16 do
   if (i mod 2)<>0 then
     begin
      s:=s+z[i];
      p:=p*z[i];
     end;
 writeln('P=',p);
 writeln('S=',s);
 writeln;
 for i:=1 to 16 do k[i]:=z[i]*exp(ln(i*z[i])/3);
 write('K=');
 for i:=1 to 16 do write(k[i]:0:0,'  ');
 max:=k[1];
 for i:=1 to 16 do
   if k[i]>max then max:=k[i];
 writeln;
 writeln('max=',max:0:0);
 for i:=1 to 16 do
   if k[i]=max then k[i]:=0;
 write('K=');
 for i:=1 to 16 do write(k[i]:0:0,'  ');
End.