Есть ответ 👍

Постройте дерево Хаффмана для любых двух фраз из списка ниже:

1) Не руби дрова на траве двора.

2) Прецедент с претендентом.

3) Течёт речка, печёт печка.

Покажите полное решение.

272
420
Посмотреть ответы 1

Ответы на вопрос:

nikita22o
4,4(14 оценок)

Var       m, i: integer;       s, p, d: real; begin       readln(m);       p : = 1;       s : = 0;             for i : = 1 to m do       begin               readln(d);               s : = s + d;               p : = p * d;       end;             if m > 10 then writeln(s);       if m < 10 then writeln(p); end.

Популярно: Информатика