Решение в приложении=====================
1)Вариант:
begin
var ar:=arrrandom(10, -5, 5);
//ar.Println;
end.
2)Вариант:
var
ar: array[1..10]of integer;
begin
for var i := 1 to 10 do ar[i] := random(-5, 5);
//for var i := 1 to 10 do write(ar[i],' ');
end.
<span>Один символ при алфавитном подходе будет нести 5 бит информации (2 в Х степени = 32) . Общий объём информации 39x5 = 195 бит</span>
Алфавит - 64 символа, поэтому на 1 символ будет уходить по 6 бит:
Общий объем - 8775 байт=8775*8 бит=70200бит.
У нас есть 6 страниц, сл-но на страницу приходится 70200/6 бит=11700 бит.
Теперь считаем сколько символов на странице: 11700/6=1950 бит (т.к. на 1 симв. 6 бит)
На страницу уходит 1950 бит, на строку в 30 раз меньше - 1950/30=65 бит.