Все аня, лена, таня и оля заняли первые четыре места в соревнованиях по плаванию. на вопрос, какие места они заняли, девочки ответили:

аня не была третьей.

оля не заняла ни первое, ни третье место.

таня была четвёртой.

кто занял первое место?

3. пять букв алфавита закодированы различной длины:

определите, какой набор букв закодирован двоичной строкой 1011101110110.
4. ваня шифрует слова, заменяя букву её номером в алфавите (без пробелов). номера букв даны в таблице.

некоторые шифровки можно расшифровать единственным другие — несколькими одна из следующих шифровок расшифровывается несколькими найдите и расшифруйте её. то, что получилось (все варианты), запишите в качестве ответа.
1) 12030 2) 102030 3) 102034 4) 102033

5. вы можете использовать алфавит из двух символов: 1 и 2. сколько разных трёхсимвольных слов существует в этом алфавите?

для ответа на вопрос постройте схему:

выпишите все слова, начинающиеся с символа 2:

6.укажите самую большую величину из следующих:

89 бит

0,25 кбайт

257 байт

11 байт

7. получено сообщение, информационный объём которого равен 4096 бит. чему равен информационный объём этого сообщения в килобайтах?

👇

Открыть все ответы

Ответ:

Lerysik00

27.03.2021

Для перевода из двоичной в шестнадцатеричный надо код разделить на тетрады (на группы по 4 цифры):
0101 1101 1000 1010 1010 1111 0010 1010
Если слева недостаточно цифр до тетрады, то слева добавляем нули.
Далее переводим тетрады в шестнадцатеричный код с таблицы:
0000 => 0 0001 => 1 0010 => 2 0011 => 3 0100 => 4
0101 => 5 0110 => 6 0111 => 7 1000 => 8 1001 => 9
1010 => A 1011 => B 1100 => C 1101 => D 1110 => E
1111 => F
0101 1101 1000 1010 1010 1111 0010 1010 = 5D8AAF2A

Для перевода в восьмеричный код делаем аналогично, только на двоичный код делим на группы по 3 цифры:
001 011 101 100 010 101 010 111 100 101 010
И также если не хватает до 3-ех цифр, то слева добавляем нули.
Затем переводим по аналогичной таблице:
000 => 0 001 => 1 010 => 2 011 => 3
100 => 4 101 => 5 110 => 6 111 => 7
001 011 101 100 010 101 010 111 100 101 010 = 13542527452

4,8(61 оценок)

Ответ:

maririz405

27.03.2021

//Когда Глеб расстроился
//Pascal ABC.NET 3.1 сборка 1256

Var
a,b,c,d,e:real;

procedure cube(a,b,c,d,e:real);
Var
p,q,delta,phi,i:real;
y:array[1..3] of real;
begin
p:=(3*a*c-sqr(b))/(3*sqr(a));
q:=(2*power(b,3)-9*a*b*c+27*sqr(a)*d)/(27*power(a,3));
delta:=power(q/2,2)+power(p/3,3);
if delta<0 then
begin
if q<0 then
   phi:=arctan(sqrt(-delta)/(-q/2));
if q>0 then
   phi:=arctan(sqrt(-delta)/(-q/2))+pi;
if q=0 then
   phi:=pi/2;
y[1]:=2*sqrt(-p/3)*cos(phi/3);
y[2]:=2*sqrt(-p/3)*cos(phi/3+(2*pi)/3);
y[3]:=2*sqrt(-p/3)*cos(phi/3+(4*pi)/3);
var x:=seq(y[1]-b/(3*a),y[2]-b/(3*a),y[3]-b/(3*a));
write(x.where(x -> x<>e).where(x -> frac(x)=0).where(x -> x>=0).Where(x -> x<=1000).Distinct.Count);
end;
if delta>0 then
begin
var arsom:=range(0,1000).Where(x->(a*power(x,3)+b*x*x+c*x+d)/(x-e)=0);
write(arsom.Count);
{Мы не виноваты, Паскаль не может в комплексные числа}
end;
if delta=0 then
begin
y[1]:=2*power(-q/2,1/3);
y[2]:=-power(-q/2,1/3);
var x:=seq(y[1]-b/(3*a),y[2]-b/(3*a));
write(x.where(x -> x<>e).where(x -> frac(x)=0).where(x -> x>=0).Where(x -> x<=1000).Distinct.Count);
end;
end;

procedure square(a,b,c,e:real);
Var
d:real;
begin
d:=sqr(b)-4*a*c;
if d<0 then writeln('0');
if d>0 then
begin
var x:=arr((-b+sqrt(d))/(2*a),(-b-sqrt(d))/(2*a));
write(x.where(x -> x<>e).where(x -> frac(x)=0).where(x -> x>=0).Where(x -> x<=1000).Distinct.Count);
end;
if d=0 then
begin
var x:=arr(-b/(2*a));
write(x.where(x -> x<>e).where(x -> frac(x)=0).where(x -> x>=0).Where(x -> x<=1000).Distinct.Count);
end;
end;

procedure common(a,b,e:real);
begin
var x:=arr(-b/a);
write(x.where(x -> x<>e).where(x -> frac(x)=0).where(x -> x>=0).Where(x -> x<=1000).Distinct.Count);
end;

procedure awfulvar(e:real);
begin
if (e>=0) and (e<=1000) then writeln('1000') else writeln('1001');
end;

procedure otherawfulvar(e:real);
begin
if e<>0 then writeln('1') else writeln('0');
end;

begin
read(a,b,c,d,e);
if (a<>0) and (b<>0) then cube(a,b,c,d,e);
if (a=0) and (b<>0) then square(b,c,d,e);
if (a=0) and (b=0) and (c<>0) and (d<>0) then common(c,d,e);
if (a=0) and (b=0) and (c=0) and (d=0) then awfulvar(e);
if (a=0) and (b=0) and (c<>0) and (d=0) then otherawfulvar(e);
if (a=0) and (b=0) and (c=0) and (d<>0) then writeln('0');
end.

Пример ввода:
1
1
1
1
1
Пример вывода:
0

4,7(4 оценок)

Это интересно:

Здоровье

13.10.2021

Как лечить бронхит натуральными методами...

Взаимоотношения

29.06.2020

Как заставить вашего мужчину форсировать отношения: эффективные стратегии...

Стиль-и-уход-за-собой

05.08.2021

Как правильно надеть кимоно: советы и рекомендации...

Стиль-и-уход-за-собой