с решением этих заданий Логические основы ЭВМ. ответ нужен Найти значения логического выражения
((1 → 0) ↔ (1 л 1) V 1)
2)Поставить знак коньюнкции или дизьюнкции
(в л ﹁а) ? (а V ﹁в)
3) Поставить знак конъюнкции или дизъюнкции вместо знака «?» (если это возможно), чтобы логическое выражение при любых значениях а и в всегда принимала значение «истина»
((﹁А → В) ↔ (С л С) V В)
var
A, B, c, x, p1, p2 :double;
const
PI = 3.1415926;
begin
readln(A, B, c, x);
if exp(c+power(x,0.2)) <> 0 then
p2 := 32.7*power(A,3)*x/exp(c+power(x,0.2))
else begin
writeln('Деление на 0 во второй дроби');
halt;
end;
if (abs(0.65 * A * PI * Power(x,3))<> 2*PI) then
p1 := tan(0.65 * A * PI * Power(x,3))
else begin
writeln('Аргумент для тангенса неверен');
halt;
end;
if (p1 < 0) then begin
writeln('Отрицательное подкоренное выражение');
halt;
end
else
if(p1 = 0) then begin
writeln('Деление на 0 в первой дроби');
halt;
end;
writeln('Результат: ', (B * cos(x)*cos(x))/sqrt(p1)+p2);
end.
Объяснение: