Используя законы преобразования логических выражений у логическое выражение: F= A / (¬A & B) При - id1344826720210403 от Nurik271100 03.04.2021 02:57

Question

Информатика: Используя законы преобразования логических выражений у логическое выражение: F= A / (¬A & B) При вводе ответа используйте следующие обозначения: 0 - ложь, 1 - истина; буквенные символы вводить латинским алфавитом; можно использовать скобки; между всеми символами пробелы не ставить; - (минус) - отрицание/инверсия; ^ (степень [Shift+6]) - коньюнкция; + (плюс) - дизъюнкция; - (минус больше) - импликация; = (равно) - эквиваленция.

Nurik271100 · Accepted Answer

Var
x,a,b,c,max,min,mid:real;
begin
readln(x);
a:=sin(x);
b:=cos(x);
if a>0 then
begin
c:=ln(x);
if (a>b) and (a>c) then max:=a else
if (b>a) and (b>c) then max:=b else max:=c;
if (a<b) and (a<c) then min:=a else
if (b<a) and (b<c) then min:=b else min:=c;
if (a>min) and (a<max) then mid:=a else
if (b>min) and (b<max) then mid:=b else mid:=c;
writeln(min,' ',mid,' ',max);
end
else
if a>b then writeln(b,' ',a) else writeln(a,' ',b);
end.

MOGZ ответил