Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.67/6: Рейтинг темы: голосов - 6, средняя оценка - 4.67
lam1987
0 / 0 / 0
Регистрация: 17.01.2012
Сообщений: 20
1

В двоичном представлении числа инвертировать последние две цифры

25.01.2013, 14:36. Просмотров 1103. Ответов 7
Метки нет (Все метки)

В двоичном представлении числа инвертировать последние две цифры. (в задании рассматривается тип word)
Замечание. При работе нельзя использовать массивы для хранения цифр двоичного представления чисел. Все действия необходимо выполнить, используя либо арифметические операции “+” или “-“ либо побитовые операции “shl”, “shr”, “and”, “or” или “xor” языка Pascal.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
25.01.2013, 14:36
Ответы с готовыми решениями:

Найти четырехзначное число, у которого две первые цифры и две последние одинаковы, являющееся квадратом
Найти четырехзначное число, у которого две первые цифры и две последние...

Определить две последние цифры
Для 5<=n<=500 в n!=1*2*3*...*n определить две последние цифры перед нулями,...

Написать программу на Ассемблере "Узнать сколько в двоичном представлении числа содержится нулей."
Здравствуйте. Мне нужно написать программу на ассемблере с помощью которой...

Количество единиц в двоичном представлении числа N
Определить, количество единиц в двоичном представлении числа N

Из массива В удалить числа в двоичном представлении которых единиц больше, чем нулей
Переписать положительные числа из матрицы целых чисел А в массив В. Из массива...

7
nnkut
45 / 45 / 16
Регистрация: 06.04.2012
Сообщений: 186
25.01.2013, 14:45 2
x:=x and 3; это если крайние правые надо инвентировать
x:=x and 49152 ; это если кранее левые
Вроде так должно работать. Попробуй.
0
HighPredator
5681 / 2003 / 720
Регистрация: 10.12.2010
Сообщений: 5,762
Записей в блоге: 3
25.01.2013, 15:21 3
Инверсия двух младших битов:
Pascal
1
2
a:=a xor 1;{ инвертируем последний }
a:=a xor (1 shl 1);{ инвертируем предпоследний }
0
nnkut
45 / 45 / 16
Регистрация: 06.04.2012
Сообщений: 186
25.01.2013, 15:27 4
Не. сорри у меня не правильно.
0
Dmitrinik
536 / 392 / 99
Регистрация: 18.08.2012
Сообщений: 1,014
25.01.2013, 21:48 5
Наверное, просто a:=a xor 3;. И получится 1 в 0, а 0 в 1.
1
lam1987
0 / 0 / 0
Регистрация: 17.01.2012
Сообщений: 20
26.01.2013, 12:49  [ТС] 6
ребят! а мсможете полностью код написать, это я совсем бум бум, а сдать надо(((
0
Dmitrinik
536 / 392 / 99
Регистрация: 18.08.2012
Сообщений: 1,014
27.01.2013, 12:42 7
Цитата Сообщение от lam1987 Посмотреть сообщение
ребят! а мсможете полностью код написать, это я совсем бум бум, а сдать надо(((
Что значит "полностью"? Что-то вроде этого?
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
Uses Crt;
Var wWord, i, Mask : Word;
    stBin    : String;
Begin
  ClrScr;
  WriteLn('   Введите число от 0 до 65535: ');
  ReadLn(wWord);
  stBin:='';
  Mask:=1;
  For i:=1 to 16 do
    begin
      if wWord AND Mask = Mask then stBin:='1'+stBin
      else                          stBin:='0'+stBin;
      Mask:=Mask SHL 1;
    end;
  WriteLn('   Введенное число имеет двоичное представление: ');
  WriteLn('   ', stBin);
 
  wWord:=wWord XOR 3;  {Собственно инверсия}
  stBin:='';
  Mask:=1;
  For i:=1 to 16 do
    begin
      if wWord AND Mask = Mask then stBin:='1'+stBin
      else                          stBin:='0'+stBin;
      Mask:=Mask SHL 1;
    end;
  WriteLn('   После инверсии двух младших битов получаем двочное представление: ');
  WriteLn('   ', stBin);
  ReadLn;
end.
0
lam1987
0 / 0 / 0
Регистрация: 17.01.2012
Сообщений: 20
28.01.2013, 13:16  [ТС] 8
ага типа этого))

Добавлено через 13 минут
спасибо!

Добавлено через 23 секунды
спасибо!!
0
28.01.2013, 13:16
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
28.01.2013, 13:16

Даны цифры: a и b. Найти позицию, на которой стоит ab в десятичном представлении числа pi
Даны две цифры: a и b. Найти позицию, на которой стоит их последовательное...

найти степень числа N, у которого три последние цифры одинаковые
найти степень числа N, у которого три последние цифры одинаковые

Написать процедуру, которая определяет, совпадают ли последние цифры записи квадрата числа с самим числом.
Дано натуральное число n. Составить процедуру, которая определяет, совпадают...


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

Или воспользуйтесь поиском по форуму:
8
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru