На 1 символ надо log(2)128=7 бит;
на 600 символов 600*7 бит = 600*7 / 8 байт = 525 байт = 525 / 1024 Кбайт = 0,5126953125 Кбайт
<h3>PascalABC.NET 3.4.2, сборка 1827 от 08.10.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var a := ArrRandom(ReadInteger('n='), -50, 50);
a.Println;
a := a[::2].Sorted.Interleave(a[1::2]).ToArray;
a.Println
end.
28 букв + 10 цифр = 38 знаков используются в номерах. Один такой знак занимает минимально 6 бит (2^5=32 < 38 < 64=2^6).
Один номер занимает 5 знаков * 6 бит/знак = 30 бит. Но хранятся номера целым количеством байтов: 24 бит (3 байта) < 30 бит < 32 (4 байта), то есть каждый номер хранится как 4 байта.
соответственно для записи 70 номеров потребуется 70 * 4 = 280 байт.
Мы получили 1/10 всей информации т.к нам открыли 1 из 10-ти букв