Наташа изучает испанский язык, в котором 27 букв(-а). Учитель информатики дала ей задание: нужно закодировать все буквы алфавита языка двоичным кодом одинаковой длины. Используя двоичные коды, Наташа написала сообщение учителю, закодировав 12 букв изучаемого языка двоичным кодом. Сколько двоичных знаков содержит сообщение?

👇

Увидеть ответ

Ответ:

Ольга12919

17.09.2022

ответ:это я Саня там на 5 умножить

Объяснение:

4,5(22 оценок)

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

Ответ:

Петрович05

17.09.2022

// PascalABC.NET 3.3, сборка 1562 от 02.11.2017
// Внимание! Если программа не работает, обновите версию!

procedure ЗаменаЦифры(Исходное,Заменяющее:int64; var Результат:string);
begin
var ИсхСтрока:=Исходное.ToString;
var ЗамСтрока:=Заменяющее.ToString;
Результат:=ИсхСтрока.Replace(ИсхСтрока.ToCharArray.Max,ЗамСтрока)
end;

begin
var КоличествоЧисел:=ReadInteger('Введите количество чисел для обработки:');
var ОчередноеИсходное,ОчередноеЗаменяющее:int64;
var РезультатЗамены:string;
Loop КоличествоЧисел do begin
    Write('Введите исходное целое число: '); Read(Очередноеисходное);
    Write('Введите целое число для замены: '); Read(ОчередноеЗаменяющее);
    ЗаменаЦифры(ОчередноеИсходное,ОчередноеЗаменяющее,РезультатЗамены);
    Writeln('Результат замены: ',РезультатЗамены)
    end
end.

Пример
Введите количество чисел для обработки: 5
Введите исходное целое число: 15630
Введите целое число для замены: 8
Результат замены: 15830
Введите исходное целое число: 235235
Введите целое число для замены: 11
Результат замены: 23112311
Введите исходное целое число: 6
Введите целое число для замены: 352
Результат замены: 352
Введите исходное целое число: 999
Введите целое число для замены: 88
Результат замены: 888888
Введите исходное целое число: 12307347740
Введите целое число для замены: 131313
Результат замены: 12301313133413131313131340

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

Ответ:

ulchik4572

17.09.2022

// PascalABC.NET 3.3, сборка 1570 от 04.11.2017
// Внимание! Если программа не работает, обновите версию!

begin
var a:=ArrRandom(11,-29,150); a.Println;
Writeln('Ср.арифм. положительных: ',a.Where(x->x>0).Average:0:3);
Writeln('Ср.арифм. отрицательных: ',a.Where(x->x<0).Average:0:3);
Swap(a[1],a[6]);
Writeln('Результирующий массив'); a.Println
end.

Пример
91 109 113 119 17 95 41 131 -15 117 -14
Ср.арифм. положительных: 92.556
Ср.арифм. отрицательных: -14.500
Результирующий массив
91 41 113 119 17 95 109 131 -15 117 -14

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

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

Здоровье

07.09.2021

Как правильно пройти тест на наркотики в домашних условиях?...

Компьютеры-и-электроника

21.07.2021

Как установить сетевой принтер: подробная инструкция...

Образование-и-коммуникации

01.05.2021

Как освоиться в новой школе...

Транспорт