использовать Чертежник
алг
нач
цел i
сместиться в точку (1,4)
опустить перо
нц для i от 1 до 4
сместиться на вектор (0,i*2-1)
сместиться на вектор (i+2,0)
сместиться на вектор (0,-(i*2-1))
сместиться на вектор (-(i+2),0)
если i <> 4 то
сместиться на вектор (0,-1) все
кц
поднять перо
сместиться в точку (0,0)
кон
// PascalABC.NET 3.1, сборка 1250 от 28.05.2016
begin
var a:=ArrRandom(100,1,20); a.Println;
Writeln('Сумма четных чисел равна ',a.Where(x->x.IsEven).Sum)
end.
<u><em>Тестовое решение</em></u>
7 9 17 2 1 18 8 9 9 3 14 13 10 18 20 5 5 9 5 18 20 12 6 19 2 3 20 17 9 15 3 2 18 17 16 8 5 11 7 15 19 11 17 15 18 18 12 17 12 11 11 11 15 9 20 16 3 19 1 18 18 12 1 14 20 12 16 14 2 13 1 15 3 11 19 9 16 12 2 4 12 3 5 19 4 12 7 10 17 1 5 7 11 9 17 7 11 3 16 6
Сумма четных чисел равна 528
№10 - 8 путей
1) А-Б-Е-К
2) А-Г-В-Б-Е-К
3) А-Г-В-Ж-Е-К
4) А-Г-В-Ж-К
5) А-Г-И-К
6) А-Г-З-К
7) А-Д-И-К
8) А-Г-В-Ж-З-К
№9 - 12 путей
1) А-Б-Д-Е-З
2) А-В-Б-Д-Е-З
3) А-В-Д-Е-З
4) А-В-Е-З
5) А-В-З
6) А-Г-В-Б-Д-Е-З
7) А-Г-В-Д-Е-З
8) А-Г-В-Е-З
9) А-Г-В-З
10) А-В-Ж-З
11) А-Г-В-Ж-З
12) А-Г-Ж-З
Объём сообщения = 114688 битов (14*1024*8)
114688/28672 = 4 бита тратится на 1 символ
По формуле мощности алфавита 2⁴= 16
Ответ: 16 символов - мощность алфавита
Всего символов: 290*39*67=757770 символов.
Если это просто символы типа char кодировки ASCII, то так как char имеет размер 1 байт, то книга занимает 757770 байт, или 757770/8=6062160 бит
