Синтез логических выражений! по таблице получается выражение x = ¬a& b& c+a& b& ¬c+a& b& c буду !

Var x,a,b,c:boolean;
beginwriteln('a':6,'b':6,'c':6 , 'x':6);
for a:= false to true do begin
for b:= false to true do begin
for c:= false to true do begin
x:= (not(a) and b and c ) or (a and b and not(c) )or (a and b and c );
writeln(a:6,b:6,c:6 , x:6);
end;end;end;end.