Очень нужно решить! 2 задания 1)Пароли к информационной системе фирмы строятся по следующему алгоритму: Табельный номер сотрудника (число от 1 до 25) переводится в двоичную систему счисления. Подсчитывается количество единиц в полученном числе и приписывается к числу справа в виде трёх двоичных разрядов. Если в полученном пароле меньше 8 разрядов - он дополняется нулями слева до байта. Например, сотрудник №13 получит пароль 01101011 (13 = 011012, в двоичной записи этого числа 3 единицы, 3 = 0112 Какие из перечисленных внизу двоичных чисел могут быть паролями сотрудников? Выберите один или несколько ответов: a. 00011011 b. 10000100 c. 00111011 d. 00010010 e. 11000011 f. 11001011 g. 11010011 2)Известно, что Х - натуральное число из интервала от 15 до 46 включительно. Имеются два высказывания о числе Х: A = {первая цифра X - нечётная} B = {X делится на 5} Какое из перечисленных ниже высказываний несёт ровно 3 бита информации о задуманном числе? В этой задаче используется вероятностный подход к измерению информации: если после получения сообщения количество возможных вариантов сократилось в 2N раз - сообщение содержит N бит информации. Выберите один ответ: NOT A AND B A AND NOT B A OR B NOT A OR B NOT A AND NOT B
Ответы
13620 байт
Объяснение:
Считаем количество символов: "собака, " содержит 8 символов. Значит объем текста до замены: 681*8 символов.
После замены количество символов в каждом слове увеличилось на 2: вместо 2-х символов a стало 4 символа _, т.е на 4 - 2 = 2 символа больше. Всего слов 681, следовательно объем текста увеличился на 2*681.
(681*8 + 681*2)*16 = 6810*16 (бит) = 6810*2*8 = 6810*2 (байт) = 13620 байт
P.S. Можно рассуждать проще: было "собака, ", стало "соб__к__, ", т.е. 10 символов в слове. Скопировано 680 раз, т.е 10 + 680*10 = 6810.
Информационный объем равен 6810*16 бит = 13620 байт
// PascalABC.Net
var vowel: set of char = ['а', 'у', 'о', 'ы', 'и', 'э', 'я', 'ю', 'ё', 'е'];
s, substr: string;
begin
s := 'кот в сапогах';
var words := s.Split(' ');
for var i := 0 to words.length - 1 do
begin
for var j := 1 to words[i].Length do
if words[i][j] in vowel then
begin
substr := Copy(words[i], 1, j-1);
Delete(words[i], 1, j-1);
words[i] += substr;
break;
end;
words[i] += 'циус';
end;
writeln(words.JoinIntoString(' '));
end.
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Популярные вопросы в разделе
Что это делает в трафике данных: android.uid.honeyboard:10184
написать код для следующего ! (c++) даны два числа. вывести порядковый номер меньшего из них. (c++)
Какая серьёзная логическая ошибка может встретится при использовании цикла с условием?
Перечислите статические элементы видеоряда
згквщрзшкяшрм368995ц05з07428евя