1 Регулюють
2 Не поширюється
3 Є об'єктом
4 Не використовувати
5 Використовувати
6 Крадене
0. 1
1. 10
2. 1001
3. 10010110
4. 1001011010010110
5. 10010110100101101001011010010110
После четвёртого шага я заметил, что наша строка состоит из подстрок "1001" и "0110". Количество таких подстрок после третьего шага начинает увеличиваться в два раза с каждым шагом. Например, в третьем шаге подстрока"10010110" - одна, а в четвёртом - две. Исходя из этого можно вынести, что в пятом шаге их - четыре (кто сомневается - проверьте). Составим таблицу, благодаря которой мы узнаем, сколько подстрок "10010110" будет в строке после одиннадцатого шага:
3. 1
4. 2
5. 4
6. 8
7. 16
8. 32
9. 64
10. 128
11. 512
После одиннадцатого шага строка будет иметь 512 подстрок "10010110" - то есть, состоять из 512 * 8 = 4096 символов. Это всего лишь отступление.
В одной подстроке "10010110" - 4 единицы. Значит, в 512 таких подстроках их будет 512 * 4 = 2048 штук.
Ответ: 2048.
Кажется так.
необходи из алфавита вычесть общее количество знаков алфавита.
program z1;
var a,b,c:string;
i,j,k,d,g:integer;
begin
writeln('Шифрование?1-да,0-нет');
readln(g);
writeln('Исходный текст ');
readln(a);
writeln('ключ');
readln(d);
c:='';
b:='абвгдеёжзийклмнопрстуфхцчшщъыьэюя';
for i:=1 to length(a) do
for j:=1 to length(b) do
begin
If g=0 then k:=(j-d) mod 32 else k:=(j+d);
if k > 33 then k:=k-33;
if a[i]=b[j] then c:=c+b[k];
end;
writeln(c);
end.