Объём информации текста 50-и символов составляет 200 бит. чему равно максимально-возможное количество - id944694220200703 от zenkov2000cemen 03.07.2020 01:26

Question

Информатика: Объём информации текста 50-и символов составляет 200 бит. чему равно максимально-возможное количество символов в алфавите?

zenkov2000cemen · Accepted Answer

Const
LIM=2; W=8; D=2; n=5; m=5; { n строк, m столбцов }
var
a: array [1..n,1..m] of real;
p: real;
h: boolean;
i, j: integer;
begin
Randomize;
WriteLn('A=');
for i:=1 to n do begin
for j:=1 to m do begin
a[i,j]:=LIM*Random;
Write(a[i,j]:W:D);
end; WriteLn;
end;
WriteLn('B=');
for i:=1 to n do begin
p:=1; h:=false;
for j:=1 to m do
if (abs(a[i,j])>=1) and (abs(a[i,j])<=1.5) then begin
p:=p*sqr(a[i,j]); h:=true;
end;
if h then Write(p:W:D) else Write('?':W);
end; WriteLn;
Write('Нажмите ENTER...'); ReadLn;
end.

Объём информации текста 50-и символов составляет 200 бит. чему равно максимально-возможное количество символов в алфавите?

MOGZ ответил