Question

Формат входных данных:
Дано целое число A и натуральное число i.

Формат выходных данных:
Обнулите у числа A его последние i бит и выведите результат обнуления.
Помогите скорей, кто понимает, о чём идет речь!

Answer 1

Сдвигаем число А вправо на i бит, а потом сдвигаем результат влево на i бит. Освободившиеся правые разряды автоматически заполняются нулями.

var
  a, i, j: integer;

begin
  Write('Введите через пробел целое А и натуральное i: ');
  Readln(a, i);
  a := (a shr i) shl i;
  Writeln('a=', a)
end.

Тестовое решение:

Введите через пробел целое А и натуральное i: 124 5
a=96