Программирование циклов с заданным условием продолжения работы.
зделайте

если под ячейкой поодразумевается байт (восемь бит) то:

(для беззнаковых (натуральных с нулём) )

или

- (для знаковых (целых) ) 

решаем относительно a: a=(-6*x2-c)/x4=-6*x2/x4-c/x4

страус- самая крупная в мире птица. не летает

var a,b,c: integer;

begin

clrscr;

readln(a,b,c);

          if a = b then writeln(c);

          if b = c then writeln(a);

          if a = c then writeln(b);

readkey;

end.