В основном просто перемножить
Вес файла = вес одного символа * кол-во символов в файле
1 38 * 2 = 76 байт
2 64 * 48 * 4 * 8 = 98304 бита = 12288 байт = 12 кбайт
(кол-во симв) * вес символа
3
k - кол - во символов, тогда
2048 + 8 * k = 16 * k
объем первоначального равен 8k
из уравнения следует что 8k = 2048 бит = 256 байт
1)k=20*320=6400;
2)n=64; n=2^i; i=6 бит
3)I=ik=6400*6=38400 бит= 4800 байт= 4 Кбайт
Ответ: 4 Кбайт
<em>// PascalABC.NET 3.3, сборка 1600 от 23.12.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var n:=18;
var dna:=ArrRandom(n,-5,15); dna.Println; // заполнение и вывод массива
Writeln('Кол-во положительных равно ',dna.Where(t->t>0).Count)
end.
<u>Пример</u>
-3 3 -5 2 6 11 1 8 -4 -3 13 -2 5 -3 2 -5 4 7
Кол-во положительных равно 11