Сообщение занимает 3 страницы по 30 строк. В каждой строке по 50 символов. Сколько символов в использованном алфавите, если все сообщение содержит 2250 байтов?

В компьютере используется только бинарная система счисления, и любая информация в компьютере кодируется двумя символами: 0 и 1 .Бит — это наименьшая единица измерения информации.

Технически, в компьютере самое маленькое объединение битов равно 8 .

Эту группу из 8 битов называют байтом (byte).1 бит — наименьшая единица измерения информации

8 бит =1 B (байт)

1024 байт =1 KB (килобайт)

1024 килобайт =1 MB (мегабайт)

1024 мегабайт =1 GB (гигабайт)

1024 гигабайт =1 TB (терабайт)

1024 терабайт =1 PB (петабайт)

В килобайтах, мегабайтах и гигабайтах измеряют объём памяти, например, объём внешней памяти — 512 (MB).

Скорость передачи информации измеряют в битах, килобайтах или мегабайтах, например, в модеме она может быть 56 Kb/s, а в локальной сети — 10 или 100 Mb/s.

1 кбит =1000 бит.Создание кода

Одним битом можно кодировать два состояния: 0 и 1 (да и нет, чёрный и белый). При увеличении количества битов на один получится в два раза больше кодов.Пример:

Два бита создают 4 разных кода: 00 , 01 , 10 и 11 ;

три бита создают 8 разных кодов: 000 , 001 , 010 , 011 , 100 , 101 , 110 , и 111 .

===== PascalABC.NET =====

function ЧислоВторыхМаксимумов(a: array of integer) :=

 a.GroupBy(p -> p)                 // сгруппировали одинаковые

   .Select(p -> (p.Count, p.Key))  // создали кортежи (кол, значение)

   .OrderByDescending(p -> p[1])   // отсортировали по убыванию значений

   .Skip(1)                        // пропустили первый элемент

   .Take(1)                        // взяли только второй элемент

   .Select(p -> p[0]);             // выделили из кортежа количество

begin

 var n:=ReadInteger('n =');        // длина массива

 var a:=ArrRandom(n, 1, 10);       // инициализируем массив

 a.Println;                        // выводим его

 ЧислоВторыхМаксимумов(a).Println  // вызываем функцию, выводим результат

end.