Каждое из логических выражений A и B зависит от одного и того же набора из 7 переменных. В таблицах истинности обоих выражений нет ни одной совпадающей строки. Каково максимально возможное число нулей в столбце значений таблицы истинности выражения ¬A ∨ B
В 16-ричном коде это выглядит так:
C1 E8 F2 20 2D 20 FD F2 EE 20 EC E8 ED E8 EC E0
EB FC ED E0 FF 20 E5 E4 E8 ED E8 F6 E0 20 E8 E7
EC E5 F0 E5 ED E8 FF 20 E8 ED F4 EE F0 EC E0 F6
E8 E8 2E
Если применить к каждому байту функцию XOR 55 (исключающее или с числом 55),
то получится
94 BD A7 75 78 75 A8 A7 BB 75 B9 BD B8 BD B9 B5
BE A9 B8 B5 AA 75 B0 B1 BD B8 BD A3 B5 75 BD B2
B9 B0 A5 B0 B8 BD AA 75 BD B8 A1 BB A5 B9 B5 A3
BD BD 7B
Самое интересное в этом коде то, что применив к нему снова XOR 55, мы получим исходное сообщение.
VAR a,b,c,d:REAL;
PROCEDURE Print_S(x,y,z:REAL);
VAR p,S:REAL;
begin If ((x+y)>z) and ((x+z)>y) and ((y+z)>x) then
begin
p:=x+y+z;
S:=SQRT(p*(p-x)*(p-y)*(p-z));
WriteLn('S= ',S);
end
else
Writeln('Треугольник не существует!');
end;
BEGIN Write('a= ');
ReadLn(a);
Write('b= ');
ReadLn(b);
Write('c= ');
ReadLn(c);
Write('d= ');
ReadLn(d);
WriteLn;
WriteLn('Стороны ',a,'; ',b,'; ',c);
Print_S(a,b,c);
WriteLn;
WriteLn('Стороны ',a,'; ',b,'; ',d);
Print_S(a,b,d);
WriteLn;
WriteLn('Стороны ',a,'; ',c,'; ',d);
Print_S(a,c,d);
WriteLn;
WriteLn('Стороны ',b,'; ',c,'; ',d);
Print_S(b,c,d);
END.