1. Определим размер сообщения в битах
6 Кб = 6×1024 = 6144 байт = 6144×8 = 49152 бит
2. Определим, сколько бит занимает один символ
49152 / 12288 = 4 бита
4. Определим мощность алфавита
Мощность алфавита - это количество символов в нем.
оно составляет 2⁴ = 16 символов
Ответ: 16
Program ...;
Var a,b,c,d,e,i:integer;
Begin
A:=0.100101*2111;
B:=0.101011*210;
c:=0.100101+2111;
D:=0.101011+210;
E:=0.100101-2111;
I:=0.101011-210;
Writeln('0.100101*2111',a);
Writeln('0101011*210',b);
Writeln('0.100101+2111',c);
Writeln('0101011+210',d);
Writeln('0.100101-2111',e);
Writeln('0101011-210',i);
End.
var a: array [1..100] of integer;
i,n,min,max:integer;
Begin
read(n);
for i := 1 to n do
read(a[i]);
min:=a[1];
max:=a[1];
for i:= 1 to n do begin
write(a[i],' ');
if max<a[i] then max:=a[i];
if min>a[i] then min:=a[i];
end;
writeln(min,max);
End.