Ответ:
Функция: ¬a→b≡(¬a∨b)⊕a
Функция: 0011
Введённая функция: ¬a→¬b≡b∧a⊕b
Вектор функция: 0000
Объяснение:
Var
shop,market:real;
begin
shop:=2500;
market:=shop*0.67;
writeln(shop-market);
end.
<u>PascalABC.NET 3.4.0, сборка 1672 от 10.06.2018</u>
<u>Внимание! Если программа не работает, обновите версию!</u>
begin
var eps:=1e-3; // точность
var (b,r):=ReadReal2('Введите сторону треугольника и радиус:');
if Abs(r-b*Sqrt(3)/6)<=eps then Writeln('Окружность можно вписать')
else Writeln('Окружность вписать нельзя')
end.
1175 в восьмиричной
637 в десятиричной
27D в шестнадцатеричной