Можно переписать так:
Х≥ 6 + (Х<5)*(X≥4) = 0
1) X=7 не подходит, так как X≥6 =1
2) X=6 не походит, так как Х≥6=1
3) Х<5 не подходит , так как (X<5)*(X>=4) =1
4) Х=4 Х≥6 =0 и (Х<5)*(X≥4) =0 - подходит
Ответ 4) 4
Упрощение
(A+B)(!A+B) -> A(!A+B)+B(!A+B) A(!A+B) -> !AA+BA !AA -> 0 !AA+BA -> BA B(!A+B) -> !AB+BB BB -> B !AB+BB -> BA(!A+B)+B(!A+B) -> B
таблица истинности
A B F0 0 = 00 1 = 11 0 = 01 1 = 1
var s1,s2,c1,c2:string;
i:integer;
Begin
read(s1,c1,c2);
for i:= 1 to length(s1) do begin
s2:=s2 + s1[i];
if s1[i]=c1 then s2:=s2+c2;
end;
writeln(s2);
End.