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

решите задачу через While:

прибавьте данное число к четным индексам и вычтите его же из нечетных.. спасиб заранее

Var
a,b:integer;
Procedure p(x,y:integer;);
Procedure w (c,d:integer);
Var
Begin
Writeln(c+d);
End;
Begin
W(x,y);
Writeln(c-d);
End;
Begin
Readln(a,b);
P(a,b);
Readln;
End.
a) Запишите имена глобальных переменных: _____________
б) Запишите имена локальных переменных: _____________
в)Обьясните термины основная программа подпрограмма

кодировки текста 31 буквы алфавита ("е" и "ё", а также "и" и "й" он считал одной буквой). Знайка быстро расшифровал сообщение, распознав количество букв в нем, и посоветовал Незнайке быть скромнее и изобретательнее. Расшифруйте слово - подпись: 0010101110100011001001110001100001110001010100101001

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

001111000110001100010010000001010011010000000011

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

б)лиса,письмо,перелёт

в)пуловер,пальто,полёт

г)молоко,реле,лассо