<u>PascalABC.NET 3.3.5, сборка 1659 от 09.04.2018</u>
<u>Внимание! Если программа не работает, обновите версию!</u>
begin
ReadSeqInteger(ReadInteger)
.Where(t->(t mod 3=0) and (Abs(t) mod 10=9)).Println
end.
Общее - это то, что можно общаться с определённым кругом лиц, различие, то что в разное время. Например: на форуме сообщениями обмениваются не сразу, а в чате они приходят за считаные секунды, в телеконференции идёт разговор в реальном времени.
Седловые точки редко рандомятся, так что вводите значения с клавиатуры. Надо вначале программе раскомментировать ввод через клавиатуру и закоментировать ввод спомощью рандома.
Построив дерево, мы найдём, что Б=00, С=01, А=011, Ц=1100, И=1101
Составим из этих букв слово
011 00 01 1100 1101 01 01 011
Прсчитаем сколько здесь символов: 22
Ответ:22