<em>// PascalABC.NET 3.2, сборка 1374 от 10.01.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
ArrRandom(ReadInteger('n='),0,1).Println.Sorted.Println
end.
<u>Пример</u>
n= 15
0 0 1 1 0 1 1 1 1 0 0 1 1 0 1
0 0 0 0 0 0 1 1 1 1 1 1 1 1 1
(10012+41001216)*740=30348308720
7) И ("and"(Pascal) / "&&"(C++))
8) 10
9) 2
10) 21
11) 12
12) 32
Каждый символ в UTF-16 кодируется 2 байтами (16 битами) (ну вообщето есть еще расширенные коды со всякими иероглифами которые кодируются 4, но кирилица туда не входит), т.о. сообщение имеет длину 20*2=40 байт (320 бит)
в кодировке koi8-r на кодирование одного символа отводится 1 байт (8 бит), т.о. длина сообщения будет 20*1=20 байт (160 бит)
следлвательно сообщение сократится в два раза 320-160=160 бит
ответ 160
Защита вашей личной информации от неправомерного доступа к ней.
Защита производственной тайны (технологии производства и т.д.)
Как-то так) Надеюсь помог.