Var x:integer;y:real;
begin
write('Введите х');
read(x);
if x>0 then y:=5*exp(2*ln(x)) - 4*х/<span>exp(3*ln(x));
</span>if x=0 then y:=5*<span>exp(2*ln(x)) - 4;
</span>if x<0 then y:=5*<span>exp(2*ln(x)) - 4*x;
</span>writeln('f(x)=',y);
end.
Максимально возможное число единиц в столбце значений таблицы истинности выражения ¬(A∧B) получится при максимальном количестве нулей в столбце значений таблицы истинности выражения (A∧B), количество единиц при этом должно быть минимальным. Так как общее количество значений в таблице равно 2^5 = 32, то минимальное количество единиц = 2*17-32 = 2.
Следовательно, максимально возможное число единиц в столбце значений таблицы истинности выражения ¬(A∧B) = 32-2 = 30.