Задача с поразрядными операциями Опции

[-Андрей-]

"Пользователем вводится число K. Оно принимает значение от 0 до 255. Используя поразрядные операции определить какие значения принимают I и J разряды. Они изменяются от 0 до 7. Проверку делать на вводе".
Вот такая вот у меня задача. Помогите мне пожалуйста её решить. В принципе, для меня самое сложное - это сделать проверку на вводе. Ну, никак не получается! А как сдвинуть разрялы и их вывести я знаю.
В общем, люди добрые, помогите написать эту программу. Пожалуйста!

[volvo]

klem4, это гораздо проще делается:

{ Нумерация битов справа налево с нулевого по седьмой... }
function BitOnOff(a, bit : byte) : boolean;
begin
  BitOnOff := ((a and ($01 shl bit)) <> 0)
end;

-Андрей-

для меня самое сложное - это сделать проверку на вводе.

О какой проверке речь?