1=>23
1) 1*3=3(1)
2)3*3=9(1)
3)9-1=8(2)
4)8*3=24(1)
5)24-1=23(2)
Ответ: 11212
1253(8) = 001 010 101 011(2)
Количество значащих нулей = 4
Var
n,b,i,k,r:integer;
begin
readln(n);
for i:=1 to n do
begin
readln(b);
if b>=8 then
begin
k:=k+1;
r:=r+b;
end;
end;
writeln('Количество сдавших:',k);
writeln('Среднее значение:',r/k);
end.
Пусть длина номера = 5
Мощность алфавита = 40
Тогда для записи 1 сивола понадобится 6 бит (2^6 > 40 < 2^5)
6 * 5 = 30 бит на 1 номер. Номер кодируется целым кол-во байт, следовательно 30/8=3.75, отсюда 4 байта отводится на 1 номер.
4*50= 200 байт.