Элементы двумерного массива а размером 10х10 первоначально были равны 1 , затем значения некоторых из них меняют с следующего фрагмента программы for n: =1 to 4 do for k: =2 to n+1 do begin a[n, k]-1; a[n, k-1]: = a[n, k]-1; endсколько элементов массива в результате будут равны 0?

Var a: array[1..10, 1..10] of real; i, j, k,n,r,t: integer; begin  Randomize;  for i := 1 to 10 do begin for j := 1 to 10 do begin    a[i, j] := 1;    Write(a[i, j]:4);    end;Writeln;end;Writeln;Writeln;for n:=1 to 4 dofor k:=2 to n+1 do begin//a[n, k]-1;a[n, k-1]:= a[n, k]-1;end;
for i := 1 to 10 do begin    for j := 1 to 10 do begin      Write(a[i, j]:4);    end;Writeln;end;
end.

будут равны 0 = 10

Все просто.

Если код равномерный двоичный, а мощность алфавита 26 символов, нужно подобрать такое количество бит (двоичных разрядов), чтобы оно могло вместить 26 комбинаций.

1 бит - 2 комбинации (2¹ = 2)

2 бита - 4 комбинации (2² = 4)

3 бита - 8 комбинаций (2³ = 8)

4 бита - 16 комбинаций (2⁴ = 16)

5 бит - 32 комбинации (2⁵ = 32)

Видно, что 4 бита мало, а 5 бит кодируют даже не 26, а 32 комбинации. Следовательно, под код одного символа нужо 5 бит.

А если символов 20, то в 20 раз больше. 5×20 = 100 бит. Это и есть нужная нам длина.

Все просто.

Если код равномерный двоичный, а мощность алфавита 26 символов, нужно подобрать такое количество бит (двоичных разрядов), чтобы оно могло вместить 26 комбинаций.

1 бит - 2 комбинации (2¹ = 2)

2 бита - 4 комбинации (2² = 4)

3 бита - 8 комбинаций (2³ = 8)

4 бита - 16 комбинаций (2⁴ = 16)

5 бит - 32 комбинации (2⁵ = 32)

Видно, что 4 бита мало, а 5 бит кодируют даже не 26, а 32 комбинации. Следовательно, под код одного символа нужо 5 бит.

А если символов 20, то в 20 раз больше. 5×20 = 100 бит. Это и есть нужная нам длина.