program step_2;
var
i,s:integer;
begin
s:=1;
for i:=1 to 10 do
begin
writeln(i:2,'-',s:3);
s:=s*2;
end;
readln;
end.
11
Объяснение:
1. Алфавит мощностью 26 символов требует для кодирования символа 5 бит (2* < 26 <29). 14 символа займут 14х5 - 70 бит %3D 70 / 8%3D 8.75 байта, округляем до целого вверх, получаем 9 байт.
2. Номер года обозначается одним из 100 чисел. 2° < 100 > 2", поэтому для кодирования требуется 7 бит.
3. Номер для обозначается одним из 366 чисел. 2° < 366> 2°, поэтому для кодирования требуется 9 бит.
4. Всего для кодирования срока действия потребуется 7+9 %3 16 бит %3D16/2%3D2 байта 5. Вся информация на пропуске займет 9+2 3D 16 байт
11
Объяснение:
1. Алфавит мощностью 26 символов требует для кодирования символа 5 бит (2* < 26 <29). 14 символа займут 14х5 - 70 бит %3D 70 / 8%3D 8.75 байта, округляем до целого вверх, получаем 9 байт.
2. Номер года обозначается одним из 100 чисел. 2° < 100 > 2", поэтому для кодирования требуется 7 бит.
3. Номер для обозначается одним из 366 чисел. 2° < 366> 2°, поэтому для кодирования требуется 9 бит.
4. Всего для кодирования срока действия потребуется 7+9 %3 16 бит %3D16/2%3D2 байта 5. Вся информация на пропуске займет 9+2 3D 16 байт
===== PascalABC.NET =====
begin
SeqWhile(1, p -> 2 * p, p -> p <= 1024).Print
end.