РЕБЯТ, СРОЧНО!!!!
замените эквивалентность.нужно в 5 колонку  записать формулу, чтоб получилось истина или ложь( ¬A↔C)

A↔B = (A + ¬B)•(¬A + B)- это основная  формула замены

спасибо вам большое, все получилось)

     A       B       F   False   False    True   False    True   False    True   False   False    True    True    True

var A,B,F: boolean;beginwriteln('A':6,'B' :8,'F' :8);for A:=false to true do beginfor B:=false to true do beginf:= not(A) and not(B) or A and B;writeln(A :8,B :8,F :8);end;end;end.

A=C = (A + ¬С)*(¬A + С)¬A=C = A≠C = ¬((A + ¬С)*(¬A + С)) = ¬(A + ¬С)+¬(¬A + С) == ¬A*C + A*¬CЗаменил переменные адресами:A - A1C - C1Подставьте какие нужны.Формула:=ЕСЛИ(ИЛИ(И(НЕ(A1);C1);И(A1;НЕ(C1)));"TRUE";"FALSE")