Ученики класса, состоящего из 21 человека, изучают немецкий или французский языки. Сообщение о том, что ученик A изучает немецкий язык, несет log23 бит информации. Сколько человек изучают французский язык?
ПРОГРАММА 101101
функция FACT(K);
начать функцию
если K>1 то
FACT := K*FACT (K-1)
иначе FACT:=1;
все
конец функции
НАЧАТЬ ПРОГРАММУ
вывод FACT (4);
КОНЕЦ ПРОГРАММЫ