При регистрации в компьютерной системе каждому пользователю выдаётся пароль, состоящий из 10 символов и содержащий только символы из 9 символьного набора: Я, Р, И, М, А, Д, Ж, Т, Ё. В базе данных для хранения сведений о каждом пользователе отведено одинаковое и минимально возможное целое число байт. При этом используют посимвольное кодирование паролей, все символы кодируют одинаковым и минимально возможным количеством бит. Кроме собственно пароля, для каждого пользователя в системе хранятся дополнительные сведения. На хранение дополнительных сведений отведено одинаковое для каждого пользователя целое количество байт. Для хранения сведений о 25 пользователях потребовалось 775 байт. Какое максимальное количество бит может быть использовано для хранения дополнительных сведений об одном пользователе? В ответе запишите только целое число – количество бит.

Для начала давайте определим, сколько бит выделяется на один символ в пароле.

Каждый символ пароля может принимать 9 различных значений, то есть для кодирования одного символа необходимо как минимум 4 бита:

Тремя битами можно закодировать максимум = 8 символов.

Четырьмя битами можно закодировать максимум = 16 символов.

Длина пароля — 9, то есть объем одного пароля в битах равен:

9*4 = 36 бит.

Пароли кодируются минимально возможным целым количеством байт, то есть:

36 : 8 = 5 байт (вообще-то получается 4,5, но количество байт должно быть целым, в 4 байт поместится максимум 32 бит, а для хранения 36-ти бит нужно как минимум 5 байт).

Кроме пароля в системе хранятся дополнительные сведения. Нам нужно узнать объем этих самых сведений.

На 20 пользователей выделяется 400 байт, то есть на одного пользователя выделено 775:25 = 31 байт.

Из этих 31-ти байт 5 уходит на пароль, а остальное — дополнительные сведения. То есть объем доп. сведений равен:

31 - 5 = 26 байт

ответ: 26 байт

var

  a: array[1..5]of integer;

  i: integer;

begin

  for i: =1 to 5 do read(a[i]);

for i: =1 to 5 do write(a[i],' ');

writeln;

for i: =1 to 5 do if a[i]> =1024 then writeln(a[i] div 1024);

writeln;

end.

var a, b: real; n: integer;

function arif_mem(a, b: real; n: integer): real; begin if n = 1 then arif_mem : = a; if n > 1 then arif_mem : = arif_mem(a, b, n - 1) + b; end;

function arif_sum(a, b: real; n: integer): real; begin if n = 1 then arif_sum : = a; if n > 1 then arif_sum : = arif_sum(a, b, n - 1) + arif_mem(a, b, n); end;

begin write('введите первый член прогрессии: '); readln(a); write('введите разность прогрессии: '); readln(b); write('введите номер члена прогрессии: '); readln(n); writeln(n, '-й член прогрессии равен : ', arif_mem(a, b, n): 8: 2); writeln('сумма ', n, ' членов прогрессии равна : ', arif_sum(a, b, n): 8: 2); end.