Для кодирования одного значка необходимо log(2)13 ≈ 4 бита.Объём сообщения <span>длиной в 666 символов</span>: 666*4 бит = 666*4/8 байт = 333 байта.
В том, что она снимается легко и не интегрирована в материнку.
<span>существительные женского рода</span>
<em>// PascalABC.NET 3.2, сборка 1417 от 28.03.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var n:BigInteger;
if not BigInteger.TryParse(ReadlnString('n='),n) then
Writeln('Введенное не является целым числом')
else
Writeln(n.IsPowerOfTwo?'YES':'NO')
end.
<u>Пример</u>
n= 2037035976334486086268445688409378161051468393665936250636140449354381299763336706183397376
YES