Вычислить результат для 8-битного числа:
1) 5 << (7 & 2)
2) 5 or 10 or !16
3) !(!2 + 2)
Вычислить результат для 6-битного числа:
1) 5 << (5 & 4)
2) 5 & 10 or !31
3) !(!2 >> 2)
Вычислить результат для 10-битного числа:
1) 35 >> 3
2) !(5 or 10) & 65
3) !(!2 << 2)
Вычислить результат для 7-битного числа:
1) 121 >> 3
2) 5 & 10 or 64 or 32
3) !2 << (2 << 2)

Это система скрытой реализации. Когда можно что-то подать на вход, и что-то получить на выход, но вот конкретно как преобразуются входящие данные в выходящие данные не известно. Вся техника по сути и есть черный ящик. Нажимаешь кнопочку на телевизоре - переключается канал, но как это происходит - не известно, если ты конечно не делал этот телевизор. Если надписи на кнопках будут на не понятном языке и инструкция на понятном языке отсутствует, то такой прибор будет класическим случаем черного ящика.

Var i, a, s: integer;
begin
     readln(a);
     for i := a to 500 do
         s := s + i;
     writeln(s);
end.

2) 
var i, a, s, c, b: integer;
begin
     readln(a, b);
     for i := a to b do
     begin
         s := s + i;
         c := c + 1;
     end;
     writeln(s / c:4:2);
end.

3)
const N=10;
var i, b, s: integer;
    a: array [0..N] of integer;
begin
     readln(b);
     for i := 0 to N do a[i] := random(9000);
     for i := 0 to N do
         if (a[i] < b) then s := s + i;
     for i := 0 to N - 2 do
         if (a[i+1] = b) then writeln('(', a[i], '; ', a[i+2], ')');
     writeln(s);
end.

=)