Незнайка написал послание и подписался одним зашифрованным словом, используя равномерный код, состоящий из 0 и 1. им был выбран самый простой способ кодировки текста 33 букв алфавита. знайка быстро расшифровал сообщение, распознав количество букв в нем, и посоветовал незнайке быть скромнее и изобретательнее. расшифруйте слово - подпись: 001111000110001100010010000001010011010000000011

самый простой способ равномерной кодировки  - это кодировка по порядку. так как в алфавите 33 буквы, то каждая несет в себе 6 бит информации (т.е. сожержит 6 0и1)

1) 001111 = 15 = н

2) 000110 = 6  = е

3) 001100 = 12 = к

4) 010010 = 18 = р

5) 000001 = 1 = а

6) 010011 = 19 =с

7) 010000 = 16 =о

8) 000011 = 3 = в

 

ответ: некрасов

Program zadacha1; const n = 10; var a: array [1..n] of integer; b, i: integer; begin randomize; for i : = 1 to n do a[i] : = random(100); b : = 0; for i : = 1 to n do if a[i] mod 3 = a[i] mod 5 then b : = b + 1; writeln('массив: '); for i : = 1 to n do write(a[i], ' '); writeln; if b > 0 then writeln('результат: ', b) else writeln('в массиве нет таких чисел'); readln; end. program zadacha2; const n = 10; var a: array [1..n] of integer; b, i: integer; begin randomize; writeln('начальный массив: '); for i : = 1 to n do begin a[i] : = random(100); write(a[i], ' '); end; writeln; b : = 1; for i : = 1 to n do if a[i] < a[b] then b : = i; a[b] : = 3; for i : = 1 to n do if i mod 2 = 0 then a[i] : = 0; writeln('конечный массив: '); for i : = 1 to n do write(a[i], ' '); readln; end.