узнаем информационный вес символа по формуле:
, где i - информационный вес символа, n - мощность алфавита (количество символов в алфавите).
, значит i = 5 бит.
информационный объём находится по формуле:
i = k × i, где i - информационный вес сообщения, k = количество символов в сообщении, i - информационный вес символа.
узнаем количество символов в сообщении:
k = 8 × 16 × 256 = 32768 символов.
узнаем информационный объём сообщения:
i = 32768 × 5 бит = 163840 бит = 20480 байт.
Поделитесь своими знаниями, ответьте на вопрос:
Нужно перевести эту блок схему в программу паскаль, как это сделать?
ответ:
program scheme;
var xn,xk,dx,x,s,p,k,y: extended;
label rep;
begin
write('enter xn: ');
readln(xn);
write('enter xk: ');
readln(xk);
write('enter dx: ');
readln(dx);
s: =0; p: =1; x: =xn; k: =0;
rep:
if x < = xk then
begin
y: =exp(sin(x))*cos(x);
writeln('x = ',x: 0: 3, ' y = ', y: 0: 3);
if y > = 0 then
s: =s+y;
if y < > 0 then
p: =p*y;
x: =x+dx;
goto rep;
end
else
begin
writeln('s = ', s: 0: 3, ' p = ', p: 0: 3, ' k = ', k: 0: 3);
exit;
end;
end.
объяснение: если есть вопросы, пишите в лс.