var
i,a,b:integer;
begin
randomize;
readln(a,b);
for i:=1 to 5 do
write(random(b-a+1)+a,' ');
end.
Каждый бит дает увеличение количества кодируемых знаков в 2 раза.
Известно, что с помощью 16-битного кода UTF-8 можно закодировать 2^16 = 65536 знаков, этого достаточно для всех основных алфавитов, включая китайские и японские иероглифы.
<span>Если добавить 17-ый бит, то можно закодировать 131072 знаков.</span>
<span>Подправил,решение гораздо меньше и используется меньше переменных
program ZADACHA1;
var
a,b,c:integer;
Begin
Writeln('Цыбулак Максим');
Readln(a);
Readln(b);</span>
Writeln('a+b=',a+b);
Writeln('a-b=',a-b);
Writeln('b-a=',b-a);
Writeln('a*b=',a*b);
Writeln('a/b=',a/b);
Writeln('b/a=',b/a);
Writeln('Квадрат числа ',a,' = ',sqr(a));
Writeln('Квадрат числа ',b,' = ',sqr(b));
Writeln('Корень числа ',a,' = ',sqrt(a));
Writeln('Корень числа ',b,' = ',sqrt(b));
end.
Ответ:
1) 375 байт * 8 = 3000 бит - объем этого сообщения
2) 3000 бит / 500 = 6 бит информационный вес каждого символа в этом сообщении.
3) N = 2^i
N = 2^6 = 64 символа в этом алфавите (мощность этого алфавита)
Подробнее - на Znanija.com - znanija.com/task/2943377#readmore
Объяснение: