===== PascalABC.NET =====
begin
ReadSeqIntegerWhile(p -> p <> 0).Count(p -> p.IsEven).Print
end.
Ну все же предельно просто 128 = 2^7
Значит любое число можно отгадать за 7 вопросов, и количество информации соответственно 7 бит
Получается, что выгодно, рост доходов составит 3300 руб.
Старый и новый планы выпуска показаны на зеленом фоне, доходы - на синем.
В прикрепленном файле находится рабочая книга в формате MS Excel-2003.
Задача решена с помощью надстройки "Поиск решения".
ответ четыре так как получается 1100011