<em>// PascalABC.NET 3.2, сборка 1417 от 28.03.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var a:=ReadArrReal(4);
Writeln('Max=',a.Max,', min',a.Min)
end.
<u>Пример:</u>
-45.4 18 0 4.17
Max=18, min-45.4
включено, выключено, мигает - троичная СС.
Есть 18 штук сигналов. Сколько разрядов в троичной СС нужно для их вмещения?
3² = 9 - двух разрядов мало
3³ = 27- три разряда достаточно
2 в 20 степени бит=128 Кб
байт- 2 в 3 ст.
кило (1024) - 2 в 10 ст
20-13=7
2 в 7 ст.=128
Итог выше
По формуле Хартли:
I = K*log2 (N), где К — длина сообщения (кол-во символов), N — количество символов в алфавите (мощность алфавита), I — кол-во информации в битах (!)
I = 8000* log2 (16) = 32000 бит
32000 бит = 4000 байт