Считая, что каждый символ кодируется одним байтом, оцените информационный объём следующего предложения: "мой дядя самых честных правил, когда не в шутку занемог, он уважать себя заставил и лучше выдумать не мог."

Предложение состоит из 106 символов, считая все пробелы, запятые и точку. следовательно, при кодировании оно будет занимать 106 байт, это и есть его информационный объем.

Var   a: array[1..20,1..20] of integer;   n,m,i,j,min,jm,x: integer; begin   randomize;   write('введите размеры массива: ');   readln(n,m);   writeln('исходный массив: ');   for i: =1 to n do   begin     for j: =1 to m do     begin       a[i,j]: =random(19)-9;       write(a[i,j]: 4);     end;     writeln;   end;   min: =0;   for i: =1 to n do min: =min+a[i,1];   writeln('сумма элементов 1-го столбца = ',min);   jm: =1;   for j: =2 to m do   begin     x: =0;     for i: =1 to n do       x: =x+a[i,j];     writeln('сумма элементов ',j,'-го столбца = ',x);     if x< min then     begin       min: =x;       jm: =j;     end;   end;   writeln('минимальная сумма в ',jm,'-м столбце');   writeln('полученный массив: ');   for i: =1 to n do   begin     for j: =1 to m do     begin       if j< > jm then a[i,j]: =a[i,jm];     write(a[i,j]: 4);     end;     writeln;   end;   readln; end .

Стандартная часть кодировочной таблицы ascii номер символ номер символ номер символ номер символ 32 56 8 80 p 104 h 33 ! 57 9 81 q 105 i 34 “ 58 : 82 r 106 j 35 # 59 ; 83 s 107 k 36 $ 60 < 84 t 108 l 37 % 61 = 85 u 109 m 38 & 62 > 86 v 110 n 39 ‘ 63 ? 87 w 111 o 40 ( 64 @ 88 x 112 p 41 ) 65 a 89 y 113 q 42 * 66 b 90 z 114 r 43 + 67 c 91 [ 115 s 44 , 68 d 92 \ 116 t 45 - 69 e 93 ] 117 u 46 . 70 f 94 ^ 118 v 47 / 71 g 95 _ 119 w 48 0 72 h 96 ` 120 x 49 1 73 i 97 a 121 y 50 2 74 j 98 b 122 z 51 3 75 k 99 c 123 { 52 4 76 l 100 d 124 | 53 5 77 m 101 e 125 } 54 6 78 n 102 f 126 ~ 55 7 79 o 103 g 127