1) begin var s1:=ReadlnString('Текст:'); Writeln('k = ',s1.Where(c->Pos(c,'01')>0).Count); var s2:=s1.Select(c->c='0'?'A':c).Select(c->c='1'?'M':c); s2.Println; end.
Пример: Текст: Текст с 1 и 0: 110+101=1011 k = 12 Текст с M и A: MMA+MAM=MAMM
2) var s1,s2:string; i,k:integer; begin writeln('Введите текст:'); readln(s1); k:=0; s2:=''; for i:=1 to length(s1) do if s1[i]='0' then begin s2:=s2+'A'; k:=k+1; end else if s1[i]='1' then begin s2:=s2+'M'; k:=k+1; end else s2:=s2+s1[i]; writeln(s2); writeln('k = ',k); end.
Пример: Введите текст: Текст с 1 и 0: 110+101=1011 Текст с M и A: MMA+MAM=MAMM k = 12
1. Всего этажей 8, значит, для идентификации каждого этажа достаточно 3 бит данных. (2^3 = 8)
Всего этажей 8, значит, для идентификации каждого этажа достаточно 3 бит данных. (2^3 = 8)Указание одного единственного этажа при таком раскладе занимает 3 бита.
Всего этажей 8, значит, для идентификации каждого этажа достаточно 3 бит данных. (2^3 = 8)Указание одного единственного этажа при таком раскладе занимает 3 бита.ответ: 3 бита.
2. Используем формулу 2^i=N. Так как в алфавите 16 символов (N=16), то 2^i=16, следовательно i=4. 4 бита весит один символ. 384*4=1536. 1536 бит весит сообщение из 384 символов по 4 бита каждый. Переводим биты в байты. 1 байт=8 бит, 1536/8=192 байта. Переводим байты в килобайты. 1 килобайт=1024 байт. 192/1024=0,1875 килобайт весит все сообщение. Так что лучше ответ оставить в байтах (192 байта).
3. Мощность алфавита - это количество символов, из которых состоит алфавит.
Мощность алфавита - это количество символов, из которых состоит алфавит.26 букв латинского *2= 52 символа и 5 основных знаков арифм операций = 52+5=57 символов -ответ
begin
var s1:=ReadlnString('Текст:');
Writeln('k = ',s1.Where(c->Pos(c,'01')>0).Count);
var s2:=s1.Select(c->c='0'?'A':c).Select(c->c='1'?'M':c);
s2.Println;
end.
Пример:
Текст: Текст с 1 и 0: 110+101=1011
k = 12
Текст с M и A: MMA+MAM=MAMM
2)
var s1,s2:string;
i,k:integer;
begin
writeln('Введите текст:');
readln(s1);
k:=0;
s2:='';
for i:=1 to length(s1) do
if s1[i]='0'
then begin s2:=s2+'A'; k:=k+1; end
else if s1[i]='1' then begin s2:=s2+'M'; k:=k+1; end else s2:=s2+s1[i];
writeln(s2);
writeln('k = ',k);
end.
Пример:
Введите текст:
Текст с 1 и 0: 110+101=1011
Текст с M и A: MMA+MAM=MAMM
k = 12
1. Всего этажей 8, значит, для идентификации каждого этажа достаточно 3 бит данных. (2^3 = 8)
Всего этажей 8, значит, для идентификации каждого этажа достаточно 3 бит данных. (2^3 = 8)Указание одного единственного этажа при таком раскладе занимает 3 бита.
Всего этажей 8, значит, для идентификации каждого этажа достаточно 3 бит данных. (2^3 = 8)Указание одного единственного этажа при таком раскладе занимает 3 бита.ответ: 3 бита.
2. Используем формулу 2^i=N. Так как в алфавите 16 символов (N=16), то 2^i=16, следовательно i=4. 4 бита весит один символ. 384*4=1536. 1536 бит весит сообщение из 384 символов по 4 бита каждый. Переводим биты в байты. 1 байт=8 бит, 1536/8=192 байта. Переводим байты в килобайты. 1 килобайт=1024 байт. 192/1024=0,1875 килобайт весит все сообщение. Так что лучше ответ оставить в байтах (192 байта).
3. Мощность алфавита - это количество символов, из которых состоит алфавит.
Мощность алфавита - это количество символов, из которых состоит алфавит.26 букв латинского *2= 52 символа и 5 основных знаков арифм операций = 52+5=57 символов -ответ
Объяснение:
(Баал классная)