Var
y, s, d: real;
i, n, j: integer;
function factorial(N: integer): longint;
begin
<span>if N = 0 then factorial := 1 </span>
Else factorial := factorial(N - 1) * N
end;
begin
readln(n);
s := 1;
<span>for i := 2 to n do </span>
begin
d := 1;
for j := 2 to i do
d := d + (1 / j);
<span>s := s + (factorial(i) / d); </span>
end;
write(s);
<span>end.</span>
16 =
следовательно 4 бита на символ
4*32 =128 бит(информации несёт)
1. 262144 бит = 262144/8 байт = 32768 байт = 32768/1024 Кбайт = 32 Кбайт<span>
2. 16384 бит = 16384/8 байт = 2048 байт = 2048/1024 </span>Кбайт = 2 Кбайт<span>
3. 131072 бит = 131072/8 байт = 16384 байт = 16384/1024 </span>Кбайт = 16 Кбайт<span>
4. 1/4 Кбайт = 1024/4 байт = 256 байт = 8*256 бит = 2048 бит
5. 227 бит = 227/8 байт = 227/(8*1024) Кбайт = 227/(8*1024*1024) Мбайт </span>≈ 0,000027 Мбайт<span>
6. 10 Кбайт = 10*1024 байт = 10240 байт = 10240*8 бит = 81920 бит = 81920/1000 Кбит = 81,92 Кбит
7. 2048 бит = 2048/1000 Кбит = 2,048 Кбит
8. 2 Кбит = 2*1000 бит = 2000/8 байт = 250 байт</span>
Если используется 8-битная кодировка, то для кодирования имени антон необходимо 5*8 бит = 40 бит = 5 байт.
Если используется 16-битная кодировка, то для кодирования необходимо 5*16 = 80 бит = 10 байт.
6 бит. конечно же . Log_2 N=6.