задача1
запишем условие: I=357 байт , К=500, N=?, i=?
решение: выразим информационный объем сообщения в битах
I=357*8=2856 бит
найдем вес одного символа i=I/K=2856/500=5.712 бит
по таблице нецелых степеней числа 2 найдем мощность алфавита -52
задача2
запишем условие: N=64, страниц=3, строк=40, символов=60, I=?
решение: найдем общее количество символов во всем тексте
К=3*40*60=7200
вычислим вес одного символа алфавита: N=2^i, 64=2^i, 2^6=2^i, i=6 бит
вычислим информационный объем текста: I=K*i=7200*6=43200 бит=5400 байт
различных символов.
бит
различных символов.
MAX_SIZE = 200;
var
N, Max, i: integer;
X: array [1..MAX_SIZE] of integer;
begin
randomize;
write('N = ');
readln(N);
writeln('Исходный массив: ');
for i := 1 to N do
begin
X[i] := random(101)-50;
write(X[i], ' ');
end;
writeln;
Max := X[1];
for i := 1 to N do
if (X[i] > Max) then
Max := X[i];
writeln('Максимальный элемент массива = ', Max);
end.