Количественная мера устранения неопределенности. что это такое?

Кмун - это мера организации системы,  изучающая количественные закономерности, связанные со сбором, передачей, преобразованием и вычислением информации.

Var ar: array[1..10] of integer; ar1: array[1..10] of integer; ar2: array[1..10] of integer; i,n1,n2: integer; begin; randomize; writeln('first array: '); for i: =1 to 10 do  begin;   ar[i]: =random(10,99);   if odd(ar[i]) then //если нечётно     begin;     inc(n1);     ar1[n1]: =ar[i];     end     else     begin;     inc(n2);     ar2[n2]: =ar[i];     end;     write(ar[i]: 4);   end; writeln; writeln('array a: '); for i: =1 to n1 do write(ar1[i]: 4); writeln; writeln('array b: '); for i: =1 to n2 do write(ar2[i]: 4); end.

var  

b,i: integer;

begin   for i: = 8 to 15 do    

b: =b+i;  

writeln('сумма чисел в диапазоне от 8 до 15 = ',b);  

b: =0;  

for i: = 8 to 15 do    

if (i mod 8) = 0 then       b: =b+i;  

writeln('сумма чисел кратных 8 в диапазоне от 8 до 15 = ',b);    

b: =0;  

writeln('числа кратные 8 в диапазоне от 8 до 15  );    

for i: = 8 to 15 do    

if ((i mod   8) = 0) then  write(i,' ');  

end.