Разработать алгоритм, отобразить его в виде блок-схемы и написать программу на языке Паскаль. Оформить отчет

[MID_SAN]

Вводится число k, принимающее значение в диапазоне от 0 до 255. Используя логические (поразрядные) операции над числами, преобразовать это число, оставив i-й и j-й разряды, номера которых вводит пользователь, такими, какие они есть, а остальные разряды сбросить в нуль. Вывести исходное и преобразованное число.
Помогите пожалуйста вообще не пойму как сделать(((

[Serge_Bliznykov]

а в чём, собственно затруднение.
1) определитесь, откуда и как будут отсчитываться разряды числа. (я бы предложил использовать "классический" способ - разряды двоичного числа отсчитываются справа налево (от меньших к большим), начиная с нуля.

2) пишете программу.
вида:
ввести число K (var K : byte);
ввести i и j (обязательно проверяя, чтобы введённые значения попали в диапазон пронумерованных разрядов числа k (например, если нумерация от нуля, тогда эти числа должны быть от нуля до семи: (i>=0) and (i<=7) и тоже самое условие для j

3) сформировать маску. взять единичку Mask1 := 1; и двигать её влево столько раз, сколько нужно, чтобы получился номер разряда заданный в i. потом тоже самое сделать для j:

  Mask1 := 1;
  for m:=1 to i do Mask1 := Mask1 shl 1;
  Mask2 := 1;
  for m:=1 to j do Mask2 := Mask2 shl 1;

объединить маски, чтобы получить одну, обобщённую маску:

Mask := Mask1 or Mask2;

ну и последнее, наложить маску на исходное число с помощью операции "логическое И":

  knew := k and Mask;

вывести исходное и преобразованное число:

  WriteLn('k=',k,' Knew = ',knew);

с программой всё.

потом нарисовать блок-схему.

потом оформляйте отчёт.

теперь можно сдавать.