Форум программистов, компьютерный форум, киберфорум
PascalABC.NET
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
0 / 0 / 0
Регистрация: 08.11.2022
Сообщений: 5

Заполнить крайнюю справа непрерывную последовательность нулевых битов заданного числа единицами

08.11.2022, 18:45. Показов 352. Ответов 6
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
заполнить крайнюю справа непрерывную последовательность нулевых битов заданного числа единицами. Например: (00100100->00100111).
0
Лучшие ответы (1)
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
08.11.2022, 18:45
Ответы с готовыми решениями:

В слове найти максимально длинную последовательность нулевых битов и заменить её на последовательность из единиц
Я пересмотрел кучу различных тем на форуме и просто в интернете. И никак не понимаю как решить поставленную задачу.Model small .stack ...

Заполнить единицами верхнюю половину, за исключением элементов, расположенных справа от побочной главной диагонали
Задано матрицу размером NxN. Заполнить единицами верхнюю половину, за исключением элементов, расположенных справа от побочной главной...

Заполнить массив заданного размера нулями и единицами по указанному принципу
Ребят дали задачу не пойму как ее решить, Заполнить массив из 100 элементов нулями и единицами следующим образом:...

6
 Аватар для mr-Crocodile
3053 / 1672 / 657
Регистрация: 19.03.2019
Сообщений: 5,380
09.11.2022, 11:00
Цитата Сообщение от DanC00per Посмотреть сообщение
заполнить крайнюю справа непрерывную последовательность нулевых битов заданного числа единицами.
исходное число в каком виде будет вводиться в программу?
0
Модератор
Эксперт Pascal/DelphiЭксперт NIX
 Аватар для bormant
7816 / 4635 / 2837
Регистрация: 22.11.2013
Сообщений: 13,159
Записей в блоге: 1
09.11.2022, 11:15
Pascal
1
WriteLn(n or (n and not (n-1)-1));
2
0 / 0 / 0
Регистрация: 08.11.2022
Сообщений: 5
09.11.2022, 11:33  [ТС]
ну типо вводишь 12 , представляешь его в двоичном виде, а потом заполняешь единицами справа. и выводить надо также в двоичном виде, но уже с преобразованиями.
0
 Аватар для Sun Serega
2355 / 1458 / 526
Регистрация: 07.04.2017
Сообщений: 4,798
09.11.2022, 12:15
Лучший ответ Сообщение было отмечено DanC00per как решение

Решение

Pascal
1
2
3
4
5
## var n := ReadInteger;
System.Convert.ToString(
  n or (n and not (n-1)-1),
  2
).Print;
1
Модератор
10451 / 5742 / 3409
Регистрация: 17.08.2012
Сообщений: 17,474
09.11.2022, 12:16
bormant, можно проще: n or (n - 1).
Pascal
1
2
3
4
5
##
  var a := ReadLnInteger('a =');
  System.Convert.ToString(a, 2).PrintLn;
  a := a or (a - 1);
  System.Convert.ToString(a, 2).PrintLn
5
Модератор
Эксперт Pascal/DelphiЭксперт NIX
 Аватар для bormant
7816 / 4635 / 2837
Регистрация: 22.11.2013
Сообщений: 13,159
Записей в блоге: 1
09.11.2022, 12:45
Цитата Сообщение от Cyborg Drone Посмотреть сообщение
можно проще: n or (n - 1)
да, биты за первой справа единицей будут нетронуты, or на них не повлияет.
abcd 1000 - 1 = abcd 0111
Что-то задумался и перемудрил
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
09.11.2022, 12:45
Помогаю со студенческими работами здесь

Распечатайте содержимое битов заданного числа
Замечание. При работе нельзя использовать массивы для хранения цифр двоичного представления чисел. Все действия необходимо выполнить,...

Перевод таблицы битов и времени в последовательность битов arduino
доброго времени суток в приведенной ниже таблице левый столбец - биты, правый - их длительность. известно, что единичный сигнал длится от...

Написать функцию, которая для заданого целого числа Х вычисляет количество пар (расположенных друг за другом) нулевых битов в этом числе
Помогите плиз)) Нужно срочно на завтра написать прогу на С++. Если можно с блок-схемой. Заранее спасибо.

Заполнить файл целыми числами. Все четные числа заменить нулями, а нечетные единицами
Помогите пожалуйста. Нужно заполнить файл целыми числами, четные числа файла заменить нулями, а нечетные заменить единицами.

Написать функцию, заменяющую n левых битов числа x на n правых инвертированных битов числа y
Написать функцию, заменяющую n левых битов числа x на n правых инвертированных битов числа y. Провести вычисление для заданных чисел x и y....


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
7
Ответ Создать тему
Новые блоги и статьи
модель ЗдравоСохранения 8. Подготовка к разному выполнению заданий
anaschu 08.04.2026
https:/ / github. com/ shumilovas/ med2. git main ветка * содержимое блока дэлэй из старой модели теперь внутри зайца новой модели 8ATzM_2aurI
Блокировка документа от изменений, если он открыт у другого пользователя
Maks 08.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в конфигурации КА2. Задача: запретить редактирование документа, если он открыт у другого пользователя. / / . . .
Система безопасности+живучести для сервера-слоя интернета (сети). Двойная привязка.
Hrethgir 08.04.2026
Далее были размышления о системе безопасности. Сообщения с наклонным текстом - мои. А как нам будет можно проверить, что ссылка наша, а не подделана хулиганами, которая выбросит на другую ветку и. . .
Модель ЗдрввоСохранения 7: больше работников, больше ресурсов.
anaschu 08.04.2026
работников и заданий может быть сколько угодно, но настроено всё так, что используется пока что только 20% kYBz3eJf3jQ
Дальние перспективы сервера - слоя сети с космологическим дизайном интефейса карты и логики.
Hrethgir 07.04.2026
Дальнейшее ближайшее планирование вывело к размышлениям над дальними перспективами. И вот тут может быть даже будут нужны оценки специалистов, так как в дальних перспективах всё может очень сильно. . .
Горе от ума
kumehtar 07.04.2026
Эта мне ментальная установка, что вот прямо сейчас, мол, мне для полного счастья не хватает (нужное вписать), и когда я этого достигну - тогда и полный кайф. Одна из самых сильных ловушек на пути. . . .
Использование значений реквизитов справочника в документе, с определенными условиями и правами
Maks 07.04.2026
1. Контроль срока действия договора Алгоритм из решения ниже реализован на примере нетипового документа "ЗаявкаНаРаботу", разработанного в конфигурации КА2. Задача: уведомлять пользователя, если. . .
Доступность команды формы по условию
Maks 07.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "СписаниеМатериалов", разработанного в конфигурации КА2. Задача: сделать доступной кнопку (команда формы "ЗавершитьСписание") при. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru