<em>// PascalABC.NET 3.3, сборка 1590 от 03.12.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
Writeln('Нечетных ',ArrRandom(ReadInteger('n='),1,50).Println.
Where(t->t.IsOdd).Count)
end.
<u>Пример</u>
n= 13
22 1 13 21 36 4 43 1 46 18 29 6 15
Нечетных 7
1) Выпало одно значение из 128. Считаем в битах. log2(128) = 7 битов.
2) log2(256) = 8 битов или 1 байт на символ. "Миру Мир!" - 9 символов, следовательно, 9 байтов.
Текила,что тут не понятного?
включено, выключено, мигает - троичная СС.
Есть 18 штук сигналов. Сколько разрядов в троичной СС нужно для их вмещения?
3² = 9 - двух разрядов мало
3³ = 27- три разряда достаточно