НАЧАЛО
вводим число
складываем цифры
Полученное число делиться на 3?
если да то делиться,
если нет не делиться
1) for R:=10 downto 1 do
writeln(R);
2) Делается аналогично, только используется цикл to и в теле цикла будет 2 оператора
<span>Решение данной задачи прикреплено ниже.</span>
Всего 32 набора.
Решил в лоб, написав простейшую программку.
См. приложения.
Лист Excel защищен без пароля, чтобы случайно не повредить формулы.
Снимаете пароль, копируете логические элементы, получаете ответ.
Коды длиной 1 ("1" и "0") использовать нельзя. Рассмотрим кодовые слова длиной 2. 00, 01 и 11 использовать нельзя, т.к. 00 и 01 не удовлетворияю условию Фано, а 11 уже используется. 10 удовлетворяет условию Фано. Ответ 10