Если принять, что один символ весит 1 байт (8 бит), то получится, что:
1 байт = 8 бит
1 Кб = 1024 байт
1 Кб = 8*1024 = 8192 бит
Тогда всего в документе содержится:
48*8192 = 393216 бит
Бит на одной странице:
393216/96 = 4096 бит
Число символов на странице:
4096/8 = 512
Степень b = 16 т.е. 2 нужно возвести в 16 степень чтобы получить 10000
Ответ:
Как я понял вам нужен список чисел от 1 до 100(включительно):
numbers=[i for i in range(1,101)]
<h3>PascalABC.NET 3.4.2, сборка 1887 от 30.11.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var a := ArrRandom(ReadInteger('n='), -50, 50);
a.Println;
a.Transform(t -> t.IsEven ? t + 1 : t * 2);
a.Println
end.
Каждый символ кодируется одним байтом. Значит, объём информации в книге равен количеству символов в ней. На странице символов 60*40=2400, а в книге всего символов 2400*150=360000байт
1,44 Мбайта память трёхдюймовой дискеты, это 1048576 байт. Считаем: 86400000: 1048576=82,3974609375. Полдискеты быть не может), поэтому будет 83 дискеты