М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
SashaKitten0606
SashaKitten0606
05.06.2020 05:48 •  Информатика

1.18 OO Начертите в тетради таблицу и переведите приведенные ниже старинные единицы длины в соответствующие единицы си: аршин 71,1 см; сажень з аршина; верста х 500 саженей; вер- шок е 44,4 мм; точка = 0,254 мм; линия е 10 точек; дюйм х 10 линий; золотник е 4,27 г; фунт 96 золотников; пуд х 40 фунтов; ведро 12,3 л; штоф = 1/10 ведра. Единица Значение си

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

Вот такая программа позволяет инвертировать нечётные биты во введённом 16-ти разрядном числе (тип word).

Если что, счёт битов я брал начиная с нуля. Поэтому, младший бит (нулевой) считается чётным. Если вдруг у вас там принято считать биты начиная с единицы, то младший будет нечётным, и тогда в строке где b := 2;  надо поставить единицу вместо двух.

Также, я сделал отображение всех 16 разрядов введённого числа, и числа которое получилось после инверсии битов (то есть, число выводится в двоичном виде, начиная со старших разрядов). Это сделано для удобства проверки работы программы.

После проверки лучше удалить эти две строки (они выделены жирным шрифтом), ведь в задании не сказано выводить числа в двоичном виде.

var

a, b, n: word;

begin

write('Введите целое неотрицательное число: a= ');

readln(a);

b:=32768;for n:=15 downto 0 do begin write((a mod(b*2))div b);b:=b div 2;end;writeln();

b := 2;

for n := 0 to 7 do

begin

if (a mod (b * 2)) div b = 0

then a := a + b

else a := a - b;

b := b * 4;

end;

b:=32768;for n:=15 downto 0 do begin write((a mod(b*2))div b);b:=b div 2;end;writeln();

writeln('После инверсии нечётных битов: a= ', a);

end.


Дано целое неотрицательное число. Получить число, инвертируя его нечетные биты. Решить в паскале
Дано целое неотрицательное число. Получить число, инвертируя его нечетные биты. Решить в паскале
Дано целое неотрицательное число. Получить число, инвертируя его нечетные биты. Решить в паскале
4,8(57 оценок)
Ответ:
csczzz
csczzz
05.06.2020

1

2

3

4

5

6

7

8

9

10

11

12

13

14

15

16

17

18

19

20

21

22

23

24

#include <iostream>

#include <vector>

using namespace std;

int main () {

   int n, numMin = 0, p = 0;

   cin >> n;

   vector <int> num(n);

   for (int i = 0; i < n; i++)

       cin >> num[i];

   for (int i = 0; i < n; i++) {

       int rav = 0;

       for (int i = p; i < n; i++) {

           if (num[numMin] == num[i]) {

               rav++;

           }

       }

       if (rav == 1) {

           cout << num[numMin] << " ";

       }

       numMin++;

       p++;

   }

return 0;

}

На вход получаю:

5

1 3 3 3 2

На выход получаю:

1 3 2 (вместо 1 2)

1

Объяснение:

4,4(7 оценок)
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ