(* Content-type: application/mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='Mathematica 6.0' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 145, 7] NotebookDataLength[ 103738, 2582] NotebookOptionsPosition[ 99096, 2452] NotebookOutlinePosition[ 99514, 2470] CellTagsIndexPosition[ 99471, 2467] WindowFrame->Normal ContainsDynamic->False*) (* Beginning of Notebook Content *) Notebook[{ Cell[CellGroupData[{ Cell["\<\ D\[EAcute]terminer les \[EAcute]ventuelles asymptotes des fonctions suivantes\ \ \>", "Subsection", CellChangeTimes->{3.43607524878895*^9}], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"q", "=", "0"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"q", "+=", "1"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"f", "[", RowBox[{"x_", ",", "q"}], "]"}], ":=", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{"x", "-", "2"}], "]"}], "-", RowBox[{"Sqrt", "[", RowBox[{"x", "+", "3"}], "]"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Print", "[", RowBox[{"q", ",", "\"\<. f(x) = \>\"", ",", RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}]}], "]"}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"q", "+=", "1"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"f", "[", RowBox[{"x_", ",", "q"}], "]"}], ":=", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{ RowBox[{"4", RowBox[{"x", "^", "2"}]}], "-", RowBox[{"4", "x"}], "-", "8"}], "]"}], "-", RowBox[{"2", "x"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Print", "[", RowBox[{"q", ",", "\"\<. f(x) = \>\"", ",", RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}]}], "]"}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"q", "+=", "1"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"f", "[", RowBox[{"x_", ",", "q"}], "]"}], ":=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"2", RowBox[{"x", "^", "2"}]}], "+", RowBox[{"5", "x"}], "+", "2"}], ")"}], "/", RowBox[{"(", RowBox[{"x", "+", "3"}], ")"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Print", "[", RowBox[{"q", ",", "\"\<. f(x) = \>\"", ",", RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}]}], "]"}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"q", "+=", "1"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"f", "[", RowBox[{"x_", ",", "q"}], "]"}], ":=", RowBox[{ RowBox[{"(", RowBox[{"1", "-", RowBox[{"2", "x"}]}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"2", RowBox[{"x", "^", "2"}]}], "+", "x", "-", "1"}], ")"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Print", "[", RowBox[{"q", ",", "\"\<. f(x) = \>\"", ",", RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}]}], "]"}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"q", "+=", "1"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"f", "[", RowBox[{"x_", ",", "q"}], "]"}], ":=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"x", "^", "3"}], "-", "x"}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"x", "^", "2"}], "+", RowBox[{"2", "x"}], "+", "1"}], ")"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Print", "[", RowBox[{"q", ",", "\"\<. f(x) = \>\"", ",", RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}]}], "]"}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"q", "+=", "1"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"f", "[", RowBox[{"x_", ",", "q"}], "]"}], ":=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"2", RowBox[{"x", "^", "2"}]}], "-", RowBox[{"5", "x"}], "-", "3"}], ")"}], "/", RowBox[{"(", RowBox[{"3", "-", "x"}], ")"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Print", "[", RowBox[{"q", ",", "\"\<. f(x) = \>\"", ",", RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}]}], "]"}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"q", "+=", "1"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"f", "[", RowBox[{"x_", ",", "q"}], "]"}], ":=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"2", "x"}], "+", "3"}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"x", "^", "2"}], "+", RowBox[{"3", "x"}], "+", "2"}], ")"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Print", "[", RowBox[{"q", ",", "\"\<. f(x) = \>\"", ",", RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}]}], "]"}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"q", "+=", "1"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"f", "[", RowBox[{"x_", ",", "q"}], "]"}], ":=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"3", RowBox[{"x", "^", "2"}]}], "+", RowBox[{"2", "x"}], "-", "1"}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"x", "^", "2"}], "-", "x", "-", "2"}], ")"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Print", "[", RowBox[{"q", ",", "\"\<. f(x) = \>\"", ",", RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}]}], "]"}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"q", "+=", "1"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"f", "[", RowBox[{"x_", ",", "q"}], "]"}], ":=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"x", "^", "2"}], "+", RowBox[{"2", "x"}], "-", "3"}], ")"}], "/", RowBox[{"(", RowBox[{ RowBox[{"2", RowBox[{"x", "^", "2"}]}], "+", RowBox[{"3", "x"}], "-", "9"}], ")"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Print", "[", RowBox[{"q", ",", "\"\<. f(x) = \>\"", ",", RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}]}], "]"}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"q", "+=", "1"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"f", "[", RowBox[{"x_", ",", "q"}], "]"}], ":=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"x", "^", "2"}], "+", "x", "-", "2"}], ")"}], "/", RowBox[{"(", RowBox[{"x", "-", RowBox[{"x", "^", "3"}]}], ")"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Print", "[", RowBox[{"q", ",", "\"\<. f(x) = \>\"", ",", RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}]}], "]"}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"q", "+=", "1"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"f", "[", RowBox[{"x_", ",", "q"}], "]"}], ":=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"2", RowBox[{"x", "^", "2"}]}], "-", RowBox[{"3", "x"}], "-", "2"}], ")"}], "/", RowBox[{"(", RowBox[{"2", "-", "x"}], ")"}]}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Print", "[", RowBox[{"q", ",", "\"\<. f(x) = \>\"", ",", RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}]}], "]"}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"q", "+=", "1"}], ";"}], "\n", RowBox[{ RowBox[{ RowBox[{"f", "[", RowBox[{"x_", ",", "q"}], "]"}], ":=", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{ RowBox[{"x", "^", "2"}], "+", "x", "-", "12"}], "]"}], "-", RowBox[{"Sqrt", "[", RowBox[{ RowBox[{"x", "^", "2"}], "-", RowBox[{"3", "x"}], "-", "10"}], "]"}]}]}], ";"}], "\n", RowBox[{ RowBox[{ RowBox[{"Print", "[", RowBox[{"q", ",", "\"\<. f(x) = \>\"", ",", RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}]}], "]"}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"q", "+=", "1"}], ";"}], "\n", RowBox[{ RowBox[{ RowBox[{"f", "[", RowBox[{"x_", ",", "q"}], "]"}], ":=", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"Sqrt", "[", RowBox[{ RowBox[{"3", "x"}], "+", "1"}], "]"}], "-", RowBox[{"Sqrt", "[", RowBox[{ RowBox[{"2", "x"}], "+", "6"}], "]"}]}], ")"}], "/", RowBox[{"(", RowBox[{"x", "-", "5"}], ")"}]}]}], ";"}], "\n", RowBox[{ RowBox[{ RowBox[{"Print", "[", RowBox[{"q", ",", "\"\<. f(x) = \>\"", ",", RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}]}], "]"}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]"}], "Input", CellOpen->False], Cell[CellGroupData[{ Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ "1", "\[InvisibleSpace]", "\<\". f(x) = \"\>", "\[InvisibleSpace]", RowBox[{ SqrtBox[ RowBox[{"x", "-", "2"}]], "-", SqrtBox[ RowBox[{"x", "+", "3"}]]}]}], SequenceForm[ 1, ". f(x) = ", (-2 + $CellContext`x)^Rational[1, 2] - ( 3 + $CellContext`x)^Rational[1, 2]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{{3.4360746531253777`*^9, 3.436074665900277*^9}}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ "2", "\[InvisibleSpace]", "\<\". f(x) = \"\>", "\[InvisibleSpace]", RowBox[{ SqrtBox[ RowBox[{ RowBox[{"4", " ", SuperscriptBox["x", "2"]}], "-", RowBox[{"4", " ", "x"}], "-", "8"}]], "-", RowBox[{"2", " ", "x"}]}]}], SequenceForm[ 2, ". f(x) = ", (-2) $CellContext`x + (-8 - 4 $CellContext`x + 4 $CellContext`x^2)^Rational[1, 2]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{{3.4360746531253777`*^9, 3.4360746659222507`*^9}}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ "3", "\[InvisibleSpace]", "\<\". f(x) = \"\>", "\[InvisibleSpace]", FractionBox[ RowBox[{ RowBox[{"2", " ", SuperscriptBox["x", "2"]}], "+", RowBox[{"5", " ", "x"}], "+", "2"}], RowBox[{"x", "+", "3"}]]}], SequenceForm[ 3, ". f(x) = ", (3 + $CellContext`x)^(-1) (2 + 5 $CellContext`x + 2 $CellContext`x^2)], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{{3.4360746531253777`*^9, 3.436074665940283*^9}}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ "4", "\[InvisibleSpace]", "\<\". f(x) = \"\>", "\[InvisibleSpace]", FractionBox[ RowBox[{"1", "-", RowBox[{"2", " ", "x"}]}], RowBox[{ RowBox[{"2", " ", SuperscriptBox["x", "2"]}], "+", "x", "-", "1"}]]}], SequenceForm[ 4, ". f(x) = ", (1 - 2 $CellContext`x)/(-1 + $CellContext`x + 2 $CellContext`x^2)], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{{3.4360746531253777`*^9, 3.4360746659564333`*^9}}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ "5", "\[InvisibleSpace]", "\<\". f(x) = \"\>", "\[InvisibleSpace]", FractionBox[ RowBox[{ SuperscriptBox["x", "3"], "-", "x"}], RowBox[{ SuperscriptBox["x", "2"], "+", RowBox[{"2", " ", "x"}], "+", "1"}]]}], SequenceForm[ 5, ". f(x) = ", (1 + 2 $CellContext`x + $CellContext`x^2)^(-1) (-$CellContext`x + \ $CellContext`x^3)], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{{3.4360746531253777`*^9, 3.436074665973744*^9}}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ "6", "\[InvisibleSpace]", "\<\". f(x) = \"\>", "\[InvisibleSpace]", FractionBox[ RowBox[{ RowBox[{"2", " ", SuperscriptBox["x", "2"]}], "-", RowBox[{"5", " ", "x"}], "-", "3"}], RowBox[{"3", "-", "x"}]]}], SequenceForm[ 6, ". f(x) = ", (3 - $CellContext`x)^(-1) (-3 - 5 $CellContext`x + 2 $CellContext`x^2)], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{{3.4360746531253777`*^9, 3.4360746659894457`*^9}}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ "7", "\[InvisibleSpace]", "\<\". f(x) = \"\>", "\[InvisibleSpace]", FractionBox[ RowBox[{ RowBox[{"2", " ", "x"}], "+", "3"}], RowBox[{ SuperscriptBox["x", "2"], "+", RowBox[{"3", " ", "x"}], "+", "2"}]]}], SequenceForm[ 7, ". f(x) = ", (3 + 2 $CellContext`x)/(2 + 3 $CellContext`x + $CellContext`x^2)], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{{3.4360746531253777`*^9, 3.436074666005896*^9}}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ "8", "\[InvisibleSpace]", "\<\". f(x) = \"\>", "\[InvisibleSpace]", FractionBox[ RowBox[{ RowBox[{"3", " ", SuperscriptBox["x", "2"]}], "+", RowBox[{"2", " ", "x"}], "-", "1"}], RowBox[{ SuperscriptBox["x", "2"], "-", "x", "-", "2"}]]}], SequenceForm[ 8, ". f(x) = ", (-2 - $CellContext`x + $CellContext`x^2)^(-1) (-1 + 2 $CellContext`x + 3 $CellContext`x^2)], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{{3.4360746531253777`*^9, 3.43607466602328*^9}}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ "9", "\[InvisibleSpace]", "\<\". f(x) = \"\>", "\[InvisibleSpace]", FractionBox[ RowBox[{ SuperscriptBox["x", "2"], "+", RowBox[{"2", " ", "x"}], "-", "3"}], RowBox[{ RowBox[{"2", " ", SuperscriptBox["x", "2"]}], "+", RowBox[{"3", " ", "x"}], "-", "9"}]]}], SequenceForm[ 9, ". f(x) = ", (-3 + 2 $CellContext`x + $CellContext`x^2)/(-9 + 3 $CellContext`x + 2 $CellContext`x^2)], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{{3.4360746531253777`*^9, 3.436074666040379*^9}}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ "10", "\[InvisibleSpace]", "\<\". f(x) = \"\>", "\[InvisibleSpace]", FractionBox[ RowBox[{ SuperscriptBox["x", "2"], "+", "x", "-", "2"}], RowBox[{"x", "-", SuperscriptBox["x", "3"]}]]}], SequenceForm[ 10, ". f(x) = ", (-2 + $CellContext`x + $CellContext`x^2)/($CellContext`x - \ $CellContext`x^3)], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{{3.4360746531253777`*^9, 3.436074666057414*^9}}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ "11", "\[InvisibleSpace]", "\<\". f(x) = \"\>", "\[InvisibleSpace]", FractionBox[ RowBox[{ RowBox[{"2", " ", SuperscriptBox["x", "2"]}], "-", RowBox[{"3", " ", "x"}], "-", "2"}], RowBox[{"2", "-", "x"}]]}], SequenceForm[ 11, ". f(x) = ", (2 - $CellContext`x)^(-1) (-2 - 3 $CellContext`x + 2 $CellContext`x^2)], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{{3.4360746531253777`*^9, 3.4360746660740013`*^9}}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ "12", "\[InvisibleSpace]", "\<\". f(x) = \"\>", "\[InvisibleSpace]", RowBox[{ SqrtBox[ RowBox[{ SuperscriptBox["x", "2"], "+", "x", "-", "12"}]], "-", SqrtBox[ RowBox[{ SuperscriptBox["x", "2"], "-", RowBox[{"3", " ", "x"}], "-", "10"}]]}]}], SequenceForm[ 12, ". f(x) = ", -(-10 - 3 $CellContext`x + $CellContext`x^2)^ Rational[1, 2] + (-12 + $CellContext`x + $CellContext`x^2)^ Rational[1, 2]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{{3.4360746531253777`*^9, 3.436074666091663*^9}}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ "13", "\[InvisibleSpace]", "\<\". f(x) = \"\>", "\[InvisibleSpace]", FractionBox[ RowBox[{ SqrtBox[ RowBox[{ RowBox[{"3", " ", "x"}], "+", "1"}]], "-", SqrtBox[ RowBox[{ RowBox[{"2", " ", "x"}], "+", "6"}]]}], RowBox[{"x", "-", "5"}]]}], SequenceForm[ 13, ". f(x) = ", (-5 + $CellContext`x)^(-1) (-(6 + 2 $CellContext`x)^ Rational[1, 2] + (1 + 3 $CellContext`x)^Rational[1, 2])], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{{3.4360746531253777`*^9, 3.436074666125181*^9}}] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Solutions", "Subsubsection"], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"q", "=", "0"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"q", "+=", "1"}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Print", "[", RowBox[{"q", ",", "\"\<. Dom f = \>\"", ",", RowBox[{"Domaine", "[", RowBox[{ RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}]}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"AV", "[", RowBox[{ RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"AO", "[", RowBox[{ RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"q", "+=", "1"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Print", "[", RowBox[{"q", ",", "\"\<. Dom f = \>\"", ",", RowBox[{"Domaine", "[", RowBox[{ RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}]}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"AV", "[", RowBox[{ RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"AO", "[", RowBox[{ RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"q", "+=", "1"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Print", "[", RowBox[{"q", ",", "\"\<. Dom f = \>\"", ",", RowBox[{"Domaine", "[", RowBox[{ RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}]}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"AV", "[", RowBox[{ RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"AO", "[", RowBox[{ RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"q", "+=", "1"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Print", "[", RowBox[{"q", ",", "\"\<. Dom f = \>\"", ",", RowBox[{"Domaine", "[", RowBox[{ RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}]}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"AV", "[", RowBox[{ RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"AO", "[", RowBox[{ RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"q", "+=", "1"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Print", "[", RowBox[{"q", ",", "\"\<. Dom f = \>\"", ",", RowBox[{"Domaine", "[", RowBox[{ RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}]}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"AV", "[", RowBox[{ RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"AO", "[", RowBox[{ RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"q", "+=", "1"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Print", "[", RowBox[{"q", ",", "\"\<. Dom f = \>\"", ",", RowBox[{"Domaine", "[", RowBox[{ RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}]}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"AV", "[", RowBox[{ RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"AO", "[", RowBox[{ RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"q", "+=", "1"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Print", "[", RowBox[{"q", ",", "\"\<. Dom f = \>\"", ",", RowBox[{"Domaine", "[", RowBox[{ RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}]}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"AV", "[", RowBox[{ RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"AO", "[", RowBox[{ RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"q", "+=", "1"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Print", "[", RowBox[{"q", ",", "\"\<. Dom f = \>\"", ",", RowBox[{"Domaine", "[", RowBox[{ RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}]}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"AV", "[", RowBox[{ RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"AO", "[", RowBox[{ RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"q", "+=", "1"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Print", "[", RowBox[{"q", ",", "\"\<. Dom f = \>\"", ",", RowBox[{"Domaine", "[", RowBox[{ RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}]}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"AV", "[", RowBox[{ RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"AO", "[", RowBox[{ RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"q", "+=", "1"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Print", "[", RowBox[{"q", ",", "\"\<. Dom f = \>\"", ",", RowBox[{"Domaine", "[", RowBox[{ RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}]}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"AV", "[", RowBox[{ RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"AO", "[", RowBox[{ RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"q", "+=", "1"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Print", "[", RowBox[{"q", ",", "\"\<. Dom f = \>\"", ",", RowBox[{"Domaine", "[", RowBox[{ RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}]}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"AV", "[", RowBox[{ RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"AO", "[", RowBox[{ RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"q", "+=", "1"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Print", "[", RowBox[{"q", ",", "\"\<. Dom f = \>\"", ",", RowBox[{"Domaine", "[", RowBox[{ RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}]}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"AV", "[", RowBox[{ RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"AO", "[", RowBox[{ RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"q", "+=", "1"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Print", "[", RowBox[{"q", ",", "\"\<. Dom f = \>\"", ",", RowBox[{"Domaine", "[", RowBox[{ RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}]}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"AV", "[", RowBox[{ RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"AO", "[", RowBox[{ RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}], ";"}], "\[IndentingNewLine]", "\[IndentingNewLine]"}], "\[IndentingNewLine]"}], "Input", CellOpen->False], Cell[CellGroupData[{ Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ "1", "\[InvisibleSpace]", "\<\". Dom f = \"\>", "\[InvisibleSpace]", FormBox[ InterpretationBox["\<\"[\\!\\(TraditionalForm\\`2\\), \ \[LongRightArrow]\"\>", StringForm["[`1`, \[LongRightArrow]", 2], Editable->False], TraditionalForm]}], SequenceForm[1, ". Dom f = ", analyse`Ens[$CellContext`x >= 2, $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.4360746847032833`*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \ 2\\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\@\\\\(x - 2\\\\) - \\\\@\\\ \\(x + 3\\\\)\\\\)\\\\)\\\"\\)\\) = \ \\!\\(TraditionalForm\\`\\(-\\@5\\)\\)\"\>", StringForm["`1` = `2`", analyse`Limite[(-2 + $CellContext`x)^Rational[1, 2] - ( 3 + $CellContext`x)^Rational[1, 2], $CellContext`x, 2], -5^ Rational[1, 2]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074684762981*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \\\\\\\"+\ \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\[Infinity]\\\\\\\\)\\\\\\\"\ \\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\@\\\\(x - 2\\\\) - \ \\\\@\\\\(x + 3\\\\)\\\\)\\\\)\\\"\\)\\) = \\!\\(TraditionalForm\\`0\\)\"\>", StringForm["`1` = `2`", analyse`Limite[(-2 + $CellContext`x)^Rational[1, 2] - ( 3 + $CellContext`x)^Rational[1, 2], $CellContext`x, DirectedInfinity[1]], 0], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074684817872*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \ \\\\(\\\\(-\\\\[Infinity]\\\\)\\\\)\\\\)\\\\) \ \\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\@\\\\(x - 2\\\\) - \\\\@\\\\(x + \ 3\\\\)\\\\)\\\\)\\\"\\)\\) n'existe pas\"\>", StringForm["`1` `2`", analyse`Limite[(-2 + $CellContext`x)^Rational[1, 2] - ( 3 + $CellContext`x)^Rational[1, 2], $CellContext`x, DirectedInfinity[-1]], " n'existe pas"], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074684845107*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\"AH\"\>", "\[InvisibleSpace]", "\<\" \[Congruent] \"\>", "\[InvisibleSpace]", RowBox[{"y", "\[LongEqual]", "0"}], "\[InvisibleSpace]", "\<\" \[AGrave] droite\"\>"}], SequenceForm[ "AH", " \[Congruent] ", $CellContext`y == 0, " \[AGrave] droite"], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074684872913*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ "2", "\[InvisibleSpace]", "\<\". Dom f = \"\>", "\[InvisibleSpace]", FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\ \\\\[LongLeftArrow], \ \\\\!\\\\(TraditionalForm\\\\`\\\\(-1\\\\)\\\\)]\\\"\\)\\) \[Union] \ \\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"[\\\\!\\\\(TraditionalForm\\\ \\`2\\\\), \\\\[LongRightArrow]\\\"\\)\\)\"\>", StringForm["`1` \[Union] `2`", analyse`Ens[$CellContext`x <= -1, $CellContext`x], analyse`Ens[$CellContext`x >= 2, $CellContext`x]], Editable->False], TraditionalForm]}], SequenceForm[2, ". Dom f = ", analyse`Ens[ Or[$CellContext`x <= -1, $CellContext`x >= 2], $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074684898597*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \ \\\\(\\\\(-1\\\\)\\\\)\\\\)\\\\) \ \\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\@\\\\(\\\\(\\\\(4\\\\\\\\ x\\\\^2\\\\)\ \\\\) - \\\\(\\\\(4\\\\\\\\ x\\\\)\\\\) - 8\\\\) - \\\\(\\\\(2\\\\\\\\ x\\\\)\ \\\\)\\\\)\\\\)\\\"\\)\\) = \\!\\(TraditionalForm\\`2\\)\"\>", StringForm["`1` = `2`", analyse`Limite[(-2) $CellContext`x + (-8 - 4 $CellContext`x + 4 $CellContext`x^2)^Rational[1, 2], $CellContext`x, -1], 2], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.4360746849421673`*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \ 2\\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\@\\\\(\\\\(\\\\(4\\\\\\\\ \ x\\\\^2\\\\)\\\\) - \\\\(\\\\(4\\\\\\\\ x\\\\)\\\\) - 8\\\\) - \ \\\\(\\\\(2\\\\\\\\ x\\\\)\\\\)\\\\)\\\\)\\\"\\)\\) = \ \\!\\(TraditionalForm\\`\\(-4\\)\\)\"\>", StringForm["`1` = `2`", analyse`Limite[(-2) $CellContext`x + (-8 - 4 $CellContext`x + 4 $CellContext`x^2)^Rational[1, 2], $CellContext`x, 2], -4], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074685000967*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \\\\\\\"+\ \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\[Infinity]\\\\\\\\)\\\\\\\"\ \\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\@\\\\(\\\\(\\\\(4\\\\\\\\ x\ \\\\^2\\\\)\\\\) - \\\\(\\\\(4\\\\\\\\ x\\\\)\\\\) - 8\\\\) - \\\\(\\\\(2\\\\\ \\\\ x\\\\)\\\\)\\\\)\\\\)\\\"\\)\\) = \ \\!\\(TraditionalForm\\`\\(-1\\)\\)\"\>", StringForm["`1` = `2`", analyse`Limite[(-2) $CellContext`x + (-8 - 4 $CellContext`x + 4 $CellContext`x^2)^Rational[1, 2], $CellContext`x, DirectedInfinity[1]], -1], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.4360746850650177`*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \ \\\\(\\\\(-\\\\[Infinity]\\\\)\\\\)\\\\)\\\\) \ \\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\@\\\\(\\\\(\\\\(4\\\\\\\\ x\\\\^2\\\\)\ \\\\) - \\\\(\\\\(4\\\\\\\\ x\\\\)\\\\) - 8\\\\) - \\\\(\\\\(2\\\\\\\\ x\\\\)\ \\\\)\\\\)\\\\)\\\"\\)\\) = \ \\!\\(TraditionalForm\\`\\\"+\\\\!\\\\(TraditionalForm\\\\`\\\\[Infinity]\\\\)\ \\\"\\)\"\>", StringForm["`1` = `2`", analyse`Limite[(-2) $CellContext`x + (-8 - 4 $CellContext`x + 4 $CellContext`x^2)^Rational[1, 2], $CellContext`x, DirectedInfinity[-1]], StringForm["+`1`", DirectedInfinity[1]]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.43607468509114*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\"AH\"\>", "\[InvisibleSpace]", "\<\" \[Congruent] \"\>", "\[InvisibleSpace]", RowBox[{"y", "\[LongEqual]", RowBox[{"-", "1"}]}], "\[InvisibleSpace]", "\<\" \[AGrave] droite\"\>"}], SequenceForm[ "AH", " \[Congruent] ", $CellContext`y == -1, " \[AGrave] droite"], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074685143567*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ "3", "\[InvisibleSpace]", "\<\". Dom f = \"\>", "\[InvisibleSpace]", FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\*TagBox[\\\"\ \[DoubleStruckCapitalR]\\\", Function[List[], Reals]]\\) \\\\ \ {\\!\\(TraditionalForm\\`\\(-3\\)\\)}\"\>", StringForm["`1` \\ {`2`}", Reals, -3], Editable->False], TraditionalForm]}], SequenceForm[3, ". Dom f = ", analyse`Ens[ Or[$CellContext`x < -3, $CellContext`x > -3], $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074685166994*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(\[Piecewise] \ \\*GridBox[{{\\\"\\\\\\\"\\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\(\ TraditionalForm\\\\\\\\`\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(\ TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"lim\\\\\\\\\\\ \\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(x \\\ \\\\\\\\\\\\\\[Rule] \ \\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(-3\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\ \\\\\\\\)\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"<\\\\\\\\\\\\\\\\\\\ \\\\\\\\\\\\\"\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\) \ \\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\ \\\\(\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(2\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ \ x\\\\\\\\\\\\\\\\^2\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\) + \\\\\\\\\\\\\\\\(\\\\\ \\\\\\\\\\\\(5\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ x\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\ \\\\) + 2\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\/\\\\\\\\\\\\\\\\(x + 3\\\\\\\\\\\\\ \\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\"\\\\\\\\)\\\\\\\\) = \ \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\(-\[Infinity]\\\\\\\\)\\\\\\\ \\)\\\\\\\"\\\", \\\"\\\\\\\" \\\\\\\"\\\"}, \ {\\\"\\\\\\\"\\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\(\ TraditionalForm\\\\\\\\`\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(\ TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"lim\\\\\\\\\\\ \\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(x \\\ \\\\\\\\\\\\\\[Rule] \ \\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(-3\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\ \\\\\\\\)\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\">\\\\\\\\\\\\\\\\\\\ \\\\\\\\\\\\\"\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\) \ \\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\ \\\\(\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(2\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ \ x\\\\\\\\\\\\\\\\^2\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\) + \\\\\\\\\\\\\\\\(\\\\\ \\\\\\\\\\\\(5\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ x\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\ \\\\) + 2\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\/\\\\\\\\\\\\\\\\(x + 3\\\\\\\\\\\\\ \\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\"\\\\\\\\)\\\\\\\\) = \ \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\\\\\\\\"+\\\\\\\\\\\\\\\\!\\\ \\\\\\\\\\\\\\(TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\\\\[Infinity]\\\\\ \\\\\\\\\\\\)\\\\\\\\\\\\\\\"\\\\\\\\)\\\\\\\"\\\", \\\"\\\\\\\" \ \\\\\\\"\\\"}}, ColumnAlignments -> {Left}, ColumnSpacings -> 1.2, \ ColumnWidths -> Automatic]\\)\\)\"\>", StringForm["`1`", Piecewise[{{ StringForm["`1` = `2`", analyse`Limite[(3 + $CellContext`x)^(-1) (2 + 5 $CellContext`x + 2 $CellContext`x^2), $CellContext`x, -3, -1], DirectedInfinity[-1]], " "}, { StringForm["`1` = `2`", analyse`Limite[(3 + $CellContext`x)^(-1) (2 + 5 $CellContext`x + 2 $CellContext`x^2), $CellContext`x, -3, 1], StringForm["+`1`", DirectedInfinity[1]]], " "}}, 0]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074685200163*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"AV \[Congruent] \\!\\(TraditionalForm\\`x\\) = \ \\!\\(TraditionalForm\\`\\(-3\\)\\)\"\>", StringForm["AV \[Congruent] `1` = `2`", $CellContext`x, -3], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074685233326*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \\\\\\\"+\ \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\[Infinity]\\\\\\\\)\\\\\\\"\ \\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\(\\\\(2\\\\\\\\ \ x\\\\^2\\\\)\\\\) + \\\\(\\\\(5\\\\\\\\ x\\\\)\\\\) + 2\\\\)\\\\/\\\\(x + 3\\\ \\)\\\\)\\\"\\)\\) = \\!\\(TraditionalForm\\`\\\"+\\\\!\\\\(TraditionalForm\\\ \\`\\\\[Infinity]\\\\)\\\"\\)\"\>", StringForm["`1` = `2`", analyse`Limite[(3 + $CellContext`x)^(-1) (2 + 5 $CellContext`x + 2 $CellContext`x^2), $CellContext`x, DirectedInfinity[1]], StringForm["+`1`", DirectedInfinity[1]]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074685267372*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \ \\\\(\\\\(-\\\\[Infinity]\\\\)\\\\)\\\\)\\\\) \ \\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\(\\\\(2\\\\\\\\ x\\\\^2\\\\)\\\\) + \\\ \\(\\\\(5\\\\\\\\ x\\\\)\\\\) + 2\\\\)\\\\/\\\\(x + 3\\\\)\\\\)\\\"\\)\\) = \ \\!\\(TraditionalForm\\`\\(-\[Infinity]\\)\\)\"\>", StringForm["`1` = `2`", analyse`Limite[(3 + $CellContext`x)^(-1) (2 + 5 $CellContext`x + 2 $CellContext`x^2), $CellContext`x, DirectedInfinity[-1]], DirectedInfinity[-1]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074685300939*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\"AO\"\>", "\[InvisibleSpace]", "\<\" \[Congruent] \"\>", "\[InvisibleSpace]", RowBox[{"y", "\[LongEqual]", RowBox[{ RowBox[{"2", " ", "x"}], "-", "1"}]}]}], SequenceForm[ "AO", " \[Congruent] ", $CellContext`y == -1 + 2 $CellContext`x], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074685333487*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ "4", "\[InvisibleSpace]", "\<\". Dom f = \"\>", "\[InvisibleSpace]", FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\*TagBox[\\\"\ \[DoubleStruckCapitalR]\\\", Function[List[], Reals]]\\) \\\\ \ {\\!\\(TraditionalForm\\`\\(-1\\)\\),\\!\\(TraditionalForm\\`1\\/2\\)}\"\>", StringForm["`1` \\ {`2`,`3`}", Reals, -1, Rational[1, 2]], Editable->False], TraditionalForm]}], SequenceForm[4, ". Dom f = ", analyse`Ens[ Or[$CellContext`x < -1, Inequality[-1, Less, $CellContext`x, Less, Rational[1, 2]], $CellContext`x > Rational[1, 2]], $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.4360746853677588`*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(\[Piecewise] \ \\*GridBox[{{\\\"\\\\\\\"\\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\(\ TraditionalForm\\\\\\\\`\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(\ TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"lim\\\\\\\\\\\ \\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(x \\\ \\\\\\\\\\\\\\[Rule] \ \\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(-1\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\ \\\\\\\\)\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"<\\\\\\\\\\\\\\\\\\\ \\\\\\\\\\\\\"\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\) \ \\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\ \\\\(1 - \\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(2\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ \ x\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\/\\\\\\\\\ \\\\\\\\(\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(2\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ \ x\\\\\\\\\\\\\\\\^2\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\) + x - \ 1\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\"\\\\\\\\)\\\\\\\\) = \ \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\\\\\\\\"+\\\\\\\\\\\\\\\\!\\\ \\\\\\\\\\\\\\(TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\\\\[Infinity]\\\\\ \\\\\\\\\\\\)\\\\\\\\\\\\\\\"\\\\\\\\)\\\\\\\"\\\", \\\"\\\\\\\" \ \\\\\\\"\\\"}, \ {\\\"\\\\\\\"\\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\(\ TraditionalForm\\\\\\\\`\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(\ TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"lim\\\\\\\\\\\ \\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(x \\\ \\\\\\\\\\\\\\[Rule] \ \\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(-1\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\ \\\\\\\\)\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\">\\\\\\\\\\\\\\\\\\\ \\\\\\\\\\\\\"\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\) \ \\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\ \\\\(1 - \\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(2\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ \ x\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\/\\\\\\\\\ \\\\\\\\(\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(2\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ \ x\\\\\\\\\\\\\\\\^2\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\) + x - \ 1\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\"\\\\\\\\)\\\\\\\\) = \ \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\(-\[Infinity]\\\\\\\\)\\\\\\\ \\)\\\\\\\"\\\", \\\"\\\\\\\" \\\\\\\"\\\"}}, ColumnAlignments -> {Left}, \ ColumnSpacings -> 1.2, ColumnWidths -> Automatic]\\)\\)\"\>", StringForm["`1`", Piecewise[{{ StringForm["`1` = `2`", analyse`Limite[(1 - 2 $CellContext`x)/(-1 + $CellContext`x + 2 $CellContext`x^2), $CellContext`x, -1, -1], StringForm["+`1`", DirectedInfinity[1]]], " "}, { StringForm["`1` = `2`", analyse`Limite[(1 - 2 $CellContext`x)/(-1 + $CellContext`x + 2 $CellContext`x^2), $CellContext`x, -1, 1], DirectedInfinity[-1]], " "}}, 0]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074685400434*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"AV \[Congruent] \\!\\(TraditionalForm\\`x\\) = \ \\!\\(TraditionalForm\\`\\(-1\\)\\)\"\>", StringForm["AV \[Congruent] `1` = `2`", $CellContext`x, -1], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074685434216*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] 1\\\\/2\\\ \\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\(1 - \\\\(\\\\(2\\\\\\\\ \ x\\\\)\\\\)\\\\)\\\\/\\\\(\\\\(\\\\(2\\\\\\\\ x\\\\^2\\\\)\\\\) + x - \ 1\\\\)\\\\)\\\"\\)\\) = \\!\\(TraditionalForm\\`\\(-\\(\\(2\\/3\\)\\)\\)\\)\"\ \>", StringForm["`1` = `2`", analyse`Limite[(1 - 2 $CellContext`x)/(-1 + $CellContext`x + 2 $CellContext`x^2), $CellContext`x, Rational[1, 2]], Rational[-2, 3]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074685467326*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \\\\\\\"+\ \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\[Infinity]\\\\\\\\)\\\\\\\"\ \\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\(1 - \\\\(\\\\(2\\\\\\\\ \ x\\\\)\\\\)\\\\)\\\\/\\\\(\\\\(\\\\(2\\\\\\\\ x\\\\^2\\\\)\\\\) + x - \ 1\\\\)\\\\)\\\"\\)\\) = \\!\\(TraditionalForm\\`0\\)\"\>", StringForm["`1` = `2`", analyse`Limite[(1 - 2 $CellContext`x)/(-1 + $CellContext`x + 2 $CellContext`x^2), $CellContext`x, DirectedInfinity[1]], 0], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.4360746855011463`*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \ \\\\(\\\\(-\\\\[Infinity]\\\\)\\\\)\\\\)\\\\) \ \\\\!\\\\(TraditionalForm\\\\`\\\\(1 - \\\\(\\\\(2\\\\\\\\ x\\\\)\\\\)\\\\)\\\ \\/\\\\(\\\\(\\\\(2\\\\\\\\ x\\\\^2\\\\)\\\\) + x - 1\\\\)\\\\)\\\"\\)\\) = \ \\!\\(TraditionalForm\\`0\\)\"\>", StringForm["`1` = `2`", analyse`Limite[(1 - 2 $CellContext`x)/(-1 + $CellContext`x + 2 $CellContext`x^2), $CellContext`x, DirectedInfinity[-1]], 0], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074685534217*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\"AH\"\>", "\[InvisibleSpace]", "\<\" \[Congruent] \"\>", "\[InvisibleSpace]", RowBox[{"y", "\[LongEqual]", "0"}]}], SequenceForm["AH", " \[Congruent] ", $CellContext`y == 0], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.4360746855675497`*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ "5", "\[InvisibleSpace]", "\<\". Dom f = \"\>", "\[InvisibleSpace]", FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\*TagBox[\\\"\ \[DoubleStruckCapitalR]\\\", Function[List[], Reals]]\\) \\\\ \ {\\!\\(TraditionalForm\\`\\(-1\\)\\)}\"\>", StringForm["`1` \\ {`2`}", Reals, -1], Editable->False], TraditionalForm]}], SequenceForm[5, ". Dom f = ", analyse`Ens[ Or[$CellContext`x < -1, $CellContext`x > -1], $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074685605493*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(\[Piecewise] \ \\*GridBox[{{\\\"\\\\\\\"\\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\(\ TraditionalForm\\\\\\\\`\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(\ TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"lim\\\\\\\\\\\ \\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(x \\\ \\\\\\\\\\\\\\[Rule] \ \\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(-1\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\ \\\\\\\\)\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"<\\\\\\\\\\\\\\\\\\\ \\\\\\\\\\\\\"\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\) \ \\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\ \\\\(x\\\\\\\\\\\\\\\\^3 - \ x\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\/\\\\\\\\\\\\\\\\(x\\\\\\\\\\\\\\\\^2 + \ \\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(2\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ x\\\\\\\\\ \\\\\\\\)\\\\\\\\\\\\\\\\) + \ 1\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\"\\\\\\\\)\\\\\\\\) = \ \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\(-\[Infinity]\\\\\\\\)\\\\\\\ \\)\\\\\\\"\\\", \\\"\\\\\\\" \\\\\\\"\\\"}, \ {\\\"\\\\\\\"\\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\(\ TraditionalForm\\\\\\\\`\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(\ TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"lim\\\\\\\\\\\ \\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(x \\\ \\\\\\\\\\\\\\[Rule] \ \\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(-1\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\ \\\\\\\\)\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\">\\\\\\\\\\\\\\\\\\\ \\\\\\\\\\\\\"\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\) \ \\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\ \\\\(x\\\\\\\\\\\\\\\\^3 - \ x\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\/\\\\\\\\\\\\\\\\(x\\\\\\\\\\\\\\\\^2 + \ \\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(2\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ x\\\\\\\\\ \\\\\\\\)\\\\\\\\\\\\\\\\) + \ 1\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\"\\\\\\\\)\\\\\\\\) = \ \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\\\\\\\\"+\\\\\\\\\\\\\\\\!\\\ \\\\\\\\\\\\\\(TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\\\\[Infinity]\\\\\ \\\\\\\\\\\\)\\\\\\\\\\\\\\\"\\\\\\\\)\\\\\\\"\\\", \\\"\\\\\\\" \ \\\\\\\"\\\"}}, ColumnAlignments -> {Left}, ColumnSpacings -> 1.2, \ ColumnWidths -> Automatic]\\)\\)\"\>", StringForm["`1`", Piecewise[{{ StringForm["`1` = `2`", analyse`Limite[(1 + 2 $CellContext`x + $CellContext`x^2)^(-1) (-$CellContext`x + \ $CellContext`x^3), $CellContext`x, -1, -1], DirectedInfinity[-1]], " "}, { StringForm["`1` = `2`", analyse`Limite[(1 + 2 $CellContext`x + $CellContext`x^2)^(-1) (-$CellContext`x + \ $CellContext`x^3), $CellContext`x, -1, 1], StringForm["+`1`", DirectedInfinity[1]]], " "}}, 0]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074685634942*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"AV \[Congruent] \\!\\(TraditionalForm\\`x\\) = \ \\!\\(TraditionalForm\\`\\(-1\\)\\)\"\>", StringForm["AV \[Congruent] `1` = `2`", $CellContext`x, -1], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074685667947*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \\\\\\\"+\ \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\[Infinity]\\\\\\\\)\\\\\\\"\ \\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\(x\\\\^3 - \ x\\\\)\\\\/\\\\(x\\\\^2 + \\\\(\\\\(2\\\\\\\\ x\\\\)\\\\) + \ 1\\\\)\\\\)\\\"\\)\\) = \ \\!\\(TraditionalForm\\`\\\"+\\\\!\\\\(TraditionalForm\\\\`\\\\[Infinity]\\\\)\ \\\"\\)\"\>", StringForm["`1` = `2`", analyse`Limite[(1 + 2 $CellContext`x + $CellContext`x^2)^(-1) (-$CellContext`x + \ $CellContext`x^3), $CellContext`x, DirectedInfinity[1]], StringForm["+`1`", DirectedInfinity[1]]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074685702147*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \ \\\\(\\\\(-\\\\[Infinity]\\\\)\\\\)\\\\)\\\\) \ \\\\!\\\\(TraditionalForm\\\\`\\\\(x\\\\^3 - x\\\\)\\\\/\\\\(x\\\\^2 + \ \\\\(\\\\(2\\\\\\\\ x\\\\)\\\\) + 1\\\\)\\\\)\\\"\\)\\) = \ \\!\\(TraditionalForm\\`\\(-\[Infinity]\\)\\)\"\>", StringForm["`1` = `2`", analyse`Limite[(1 + 2 $CellContext`x + $CellContext`x^2)^(-1) (-$CellContext`x + \ $CellContext`x^3), $CellContext`x, DirectedInfinity[-1]], DirectedInfinity[-1]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074685735141*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\"AO\"\>", "\[InvisibleSpace]", "\<\" \[Congruent] \"\>", "\[InvisibleSpace]", RowBox[{"y", "\[LongEqual]", RowBox[{"x", "-", "2"}]}]}], SequenceForm[ "AO", " \[Congruent] ", $CellContext`y == -2 + $CellContext`x], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.4360746857689857`*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ "6", "\[InvisibleSpace]", "\<\". Dom f = \"\>", "\[InvisibleSpace]", FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\*TagBox[\\\"\ \[DoubleStruckCapitalR]\\\", Function[List[], Reals]]\\) \\\\ \ {\\!\\(TraditionalForm\\`3\\)}\"\>", StringForm["`1` \\ {`2`}", Reals, 3], Editable->False], TraditionalForm]}], SequenceForm[6, ". Dom f = ", analyse`Ens[ Or[$CellContext`x < 3, $CellContext`x > 3], $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.43607468580229*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \ 3\\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\(\\\\(2\\\\\\\\ \ x\\\\^2\\\\)\\\\) - \\\\(\\\\(5\\\\\\\\ x\\\\)\\\\) - 3\\\\)\\\\/\\\\(3 - x\\\ \\)\\\\)\\\"\\)\\) = \\!\\(TraditionalForm\\`\\(-7\\)\\)\"\>", StringForm["`1` = `2`", analyse`Limite[(3 - $CellContext`x)^(-1) (-3 - 5 $CellContext`x + 2 $CellContext`x^2), $CellContext`x, 3], -7], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074685835595*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \\\\\\\"+\ \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\[Infinity]\\\\\\\\)\\\\\\\"\ \\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\(\\\\(2\\\\\\\\ \ x\\\\^2\\\\)\\\\) - \\\\(\\\\(5\\\\\\\\ x\\\\)\\\\) - 3\\\\)\\\\/\\\\(3 - x\\\ \\)\\\\)\\\"\\)\\) = \\!\\(TraditionalForm\\`\\(-\[Infinity]\\)\\)\"\>", StringForm["`1` = `2`", analyse`Limite[(3 - $CellContext`x)^(-1) (-3 - 5 $CellContext`x + 2 $CellContext`x^2), $CellContext`x, DirectedInfinity[1]], DirectedInfinity[-1]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074685868991*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \ \\\\(\\\\(-\\\\[Infinity]\\\\)\\\\)\\\\)\\\\) \ \\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\(\\\\(2\\\\\\\\ x\\\\^2\\\\)\\\\) - \\\ \\(\\\\(5\\\\\\\\ x\\\\)\\\\) - 3\\\\)\\\\/\\\\(3 - x\\\\)\\\\)\\\"\\)\\) = \ \\!\\(TraditionalForm\\`\\\"+\\\\!\\\\(TraditionalForm\\\\`\\\\[Infinity]\\\\)\ \\\"\\)\"\>", StringForm["`1` = `2`", analyse`Limite[(3 - $CellContext`x)^(-1) (-3 - 5 $CellContext`x + 2 $CellContext`x^2), $CellContext`x, DirectedInfinity[-1]], StringForm["+`1`", DirectedInfinity[1]]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074685902341*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\"AO\"\>", "\[InvisibleSpace]", "\<\" \[Congruent] \"\>", "\[InvisibleSpace]", RowBox[{"y", "\[LongEqual]", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", "x"}], "-", "1"}]}]}], SequenceForm[ "AO", " \[Congruent] ", $CellContext`y == -1 - 2 $CellContext`x], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074685936018*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ "7", "\[InvisibleSpace]", "\<\". Dom f = \"\>", "\[InvisibleSpace]", FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\*TagBox[\\\"\ \[DoubleStruckCapitalR]\\\", Function[List[], Reals]]\\) \\\\ \ {\\!\\(TraditionalForm\\`\\(-2\\)\\),\\!\\(TraditionalForm\\`\\(-1\\)\\)}\"\>\ ", StringForm["`1` \\ {`2`,`3`}", Reals, -2, -1], Editable->False], TraditionalForm]}], SequenceForm[7, ". Dom f = ", analyse`Ens[ Or[$CellContext`x < -2, Inequality[-2, Less, $CellContext`x, Less, -1], $CellContext`x > -1], $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.4360746859698153`*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(\[Piecewise] \ \\*GridBox[{{\\\"\\\\\\\"\\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\(\ TraditionalForm\\\\\\\\`\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(\ TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"lim\\\\\\\\\\\ \\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(x \\\ \\\\\\\\\\\\\\[Rule] \ \\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(-2\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\ \\\\\\\\)\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"<\\\\\\\\\\\\\\\\\\\ \\\\\\\\\\\\\"\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\) \ \\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\ \\\\(\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(2\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ \ x\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\) + 3\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\/\\\\\ \\\\\\\\\\\\(x\\\\\\\\\\\\\\\\^2 + \ \\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(3\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ x\\\\\\\\\ \\\\\\\\)\\\\\\\\\\\\\\\\) + \ 2\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\"\\\\\\\\)\\\\\\\\) = \ \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\(-\[Infinity]\\\\\\\\)\\\\\\\ \\)\\\\\\\"\\\", \\\"\\\\\\\" \\\\\\\"\\\"}, \ {\\\"\\\\\\\"\\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\(\ TraditionalForm\\\\\\\\`\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(\ TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"lim\\\\\\\\\\\ \\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(x \\\ \\\\\\\\\\\\\\[Rule] \ \\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(-2\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\ \\\\\\\\)\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\">\\\\\\\\\\\\\\\\\\\ \\\\\\\\\\\\\"\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\) \ \\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\ \\\\(\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(2\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ \ x\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\) + 3\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\/\\\\\ \\\\\\\\\\\\(x\\\\\\\\\\\\\\\\^2 + \ \\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(3\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ x\\\\\\\\\ \\\\\\\\)\\\\\\\\\\\\\\\\) + \ 2\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\"\\\\\\\\)\\\\\\\\) = \ \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\\\\\\\\"+\\\\\\\\\\\\\\\\!\\\ \\\\\\\\\\\\\\(TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\\\\[Infinity]\\\\\ \\\\\\\\\\\\)\\\\\\\\\\\\\\\"\\\\\\\\)\\\\\\\"\\\", \\\"\\\\\\\" \ \\\\\\\"\\\"}}, ColumnAlignments -> {Left}, ColumnSpacings -> 1.2, \ ColumnWidths -> Automatic]\\)\\)\"\>", StringForm["`1`", Piecewise[{{ StringForm["`1` = `2`", analyse`Limite[(3 + 2 $CellContext`x)/(2 + 3 $CellContext`x + $CellContext`x^2), $CellContext`x, -2, -1], DirectedInfinity[-1]], " "}, { StringForm["`1` = `2`", analyse`Limite[(3 + 2 $CellContext`x)/(2 + 3 $CellContext`x + $CellContext`x^2), $CellContext`x, -2, 1], StringForm["+`1`", DirectedInfinity[1]]], " "}}, 0]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074686003579*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"AV \[Congruent] \\!\\(TraditionalForm\\`x\\) = \ \\!\\(TraditionalForm\\`\\(-2\\)\\)\"\>", StringForm["AV \[Congruent] `1` = `2`", $CellContext`x, -2], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074686036092*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(\[Piecewise] \ \\*GridBox[{{\\\"\\\\\\\"\\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\(\ TraditionalForm\\\\\\\\`\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(\ TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"lim\\\\\\\\\\\ \\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(x \\\ \\\\\\\\\\\\\\[Rule] \ \\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(-1\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\ \\\\\\\\)\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"<\\\\\\\\\\\\\\\\\\\ \\\\\\\\\\\\\"\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\) \ \\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\ \\\\(\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(2\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ \ x\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\) + 3\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\/\\\\\ \\\\\\\\\\\\(x\\\\\\\\\\\\\\\\^2 + \ \\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(3\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ x\\\\\\\\\ \\\\\\\\)\\\\\\\\\\\\\\\\) + \ 2\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\"\\\\\\\\)\\\\\\\\) = \ \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\(-\[Infinity]\\\\\\\\)\\\\\\\ \\)\\\\\\\"\\\", \\\"\\\\\\\" \\\\\\\"\\\"}, \ {\\\"\\\\\\\"\\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\(\ TraditionalForm\\\\\\\\`\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(\ TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"lim\\\\\\\\\\\ \\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(x \\\ \\\\\\\\\\\\\\[Rule] \ \\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(-1\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\ \\\\\\\\)\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\">\\\\\\\\\\\\\\\\\\\ \\\\\\\\\\\\\"\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\) \ \\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\ \\\\(\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(2\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ \ x\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\) + 3\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\/\\\\\ \\\\\\\\\\\\(x\\\\\\\\\\\\\\\\^2 + \ \\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(3\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ x\\\\\\\\\ \\\\\\\\)\\\\\\\\\\\\\\\\) + \ 2\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\"\\\\\\\\)\\\\\\\\) = \ \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\\\\\\\\"+\\\\\\\\\\\\\\\\!\\\ \\\\\\\\\\\\\\(TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\\\\[Infinity]\\\\\ \\\\\\\\\\\\)\\\\\\\\\\\\\\\"\\\\\\\\)\\\\\\\"\\\", \\\"\\\\\\\" \ \\\\\\\"\\\"}}, ColumnAlignments -> {Left}, ColumnSpacings -> 1.2, \ ColumnWidths -> Automatic]\\)\\)\"\>", StringForm["`1`", Piecewise[{{ StringForm["`1` = `2`", analyse`Limite[(3 + 2 $CellContext`x)/(2 + 3 $CellContext`x + $CellContext`x^2), $CellContext`x, -1, -1], DirectedInfinity[-1]], " "}, { StringForm["`1` = `2`", analyse`Limite[(3 + 2 $CellContext`x)/(2 + 3 $CellContext`x + $CellContext`x^2), $CellContext`x, -1, 1], StringForm["+`1`", DirectedInfinity[1]]], " "}}, 0]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074686074317*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"AV \[Congruent] \\!\\(TraditionalForm\\`x\\) = \ \\!\\(TraditionalForm\\`\\(-1\\)\\)\"\>", StringForm["AV \[Congruent] `1` = `2`", $CellContext`x, -1], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074686103533*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \\\\\\\"+\ \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\[Infinity]\\\\\\\\)\\\\\\\"\ \\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\(\\\\(2\\\\\\\\ x\\\\)\\\\) \ + 3\\\\)\\\\/\\\\(x\\\\^2 + \\\\(\\\\(3\\\\\\\\ x\\\\)\\\\) + 2\\\\)\\\\)\\\"\ \\)\\) = \\!\\(TraditionalForm\\`0\\)\"\>", StringForm["`1` = `2`", analyse`Limite[(3 + 2 $CellContext`x)/(2 + 3 $CellContext`x + $CellContext`x^2), $CellContext`x, DirectedInfinity[1]], 0], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.4360746861363*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \ \\\\(\\\\(-\\\\[Infinity]\\\\)\\\\)\\\\)\\\\) \ \\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\(\\\\(2\\\\\\\\ x\\\\)\\\\) + 3\\\\)\\\ \\/\\\\(x\\\\^2 + \\\\(\\\\(3\\\\\\\\ x\\\\)\\\\) + 2\\\\)\\\\)\\\"\\)\\) = \ \\!\\(TraditionalForm\\`0\\)\"\>", StringForm["`1` = `2`", analyse`Limite[(3 + 2 $CellContext`x)/(2 + 3 $CellContext`x + $CellContext`x^2), $CellContext`x, DirectedInfinity[-1]], 0], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074686169701*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\"AH\"\>", "\[InvisibleSpace]", "\<\" \[Congruent] \"\>", "\[InvisibleSpace]", RowBox[{"y", "\[LongEqual]", "0"}]}], SequenceForm["AH", " \[Congruent] ", $CellContext`y == 0], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074686203319*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ "8", "\[InvisibleSpace]", "\<\". Dom f = \"\>", "\[InvisibleSpace]", FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\*TagBox[\\\"\ \[DoubleStruckCapitalR]\\\", Function[List[], Reals]]\\) \\\\ \ {\\!\\(TraditionalForm\\`\\(-1\\)\\),\\!\\(TraditionalForm\\`2\\)}\"\>", StringForm["`1` \\ {`2`,`3`}", Reals, -1, 2], Editable->False], TraditionalForm]}], SequenceForm[8, ". Dom f = ", analyse`Ens[ Or[$CellContext`x < -1, Inequality[-1, Less, $CellContext`x, Less, 2], $CellContext`x > 2], $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074686236837*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \ \\\\(\\\\(-1\\\\)\\\\)\\\\)\\\\) \ \\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\(\\\\(3\\\\\\\\ x\\\\^2\\\\)\\\\) + \\\ \\(\\\\(2\\\\\\\\ x\\\\)\\\\) - 1\\\\)\\\\/\\\\(x\\\\^2 - x - 2\\\\)\\\\)\\\"\ \\)\\) = \\!\\(TraditionalForm\\`4\\/3\\)\"\>", StringForm["`1` = `2`", analyse`Limite[(-2 - $CellContext`x + $CellContext`x^2)^(-1) (-1 + 2 $CellContext`x + 3 $CellContext`x^2), $CellContext`x, -1], Rational[4, 3]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.4360746862704277`*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(\[Piecewise] \ \\*GridBox[{{\\\"\\\\\\\"\\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\(\ TraditionalForm\\\\\\\\`\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(\ TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"lim\\\\\\\\\\\ \\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(x \\\ \\\\\\\\\\\\\\[Rule] \ 2\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"<\\\\\\\\\\\ \\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\) \ \\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\ \\\\(\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(3\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ \ x\\\\\\\\\\\\\\\\^2\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\) + \\\\\\\\\\\\\\\\(\\\\\ \\\\\\\\\\\\(2\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ x\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\ \\\\) - 1\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\/\\\\\\\\\\\\\\\\(x\\\\\\\\\\\\\\\\^\ 2 - x - 2\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\"\\\\\\\\)\\\\\\\\) \ = \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\(-\[Infinity]\\\\\\\\)\\\\\ \\\\)\\\\\\\"\\\", \\\"\\\\\\\" \\\\\\\"\\\"}, \ {\\\"\\\\\\\"\\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\(\ TraditionalForm\\\\\\\\`\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(\ TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"lim\\\\\\\\\\\ \\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(x \\\ \\\\\\\\\\\\\\[Rule] \ 2\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\">\\\\\\\\\\\ \\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\) \ \\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\ \\\\(\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(3\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ \ x\\\\\\\\\\\\\\\\^2\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\) + \\\\\\\\\\\\\\\\(\\\\\ \\\\\\\\\\\\(2\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ x\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\ \\\\) - 1\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\/\\\\\\\\\\\\\\\\(x\\\\\\\\\\\\\\\\^\ 2 - x - 2\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\"\\\\\\\\)\\\\\\\\) \ = \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\\\\\\\\"+\\\\\\\\\\\\\\\\!\ \\\\\\\\\\\\\\\\(TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\\\\[Infinity]\\\ \\\\\\\\\\\\\\)\\\\\\\\\\\\\\\"\\\\\\\\)\\\\\\\"\\\", \\\"\\\\\\\" \ \\\\\\\"\\\"}}, ColumnAlignments -> {Left}, ColumnSpacings -> 1.2, \ ColumnWidths -> Automatic]\\)\\)\"\>", StringForm["`1`", Piecewise[{{ StringForm["`1` = `2`", analyse`Limite[(-2 - $CellContext`x + $CellContext`x^2)^(-1) (-1 + 2 $CellContext`x + 3 $CellContext`x^2), $CellContext`x, 2, -1], DirectedInfinity[-1]], " "}, { StringForm["`1` = `2`", analyse`Limite[(-2 - $CellContext`x + $CellContext`x^2)^(-1) (-1 + 2 $CellContext`x + 3 $CellContext`x^2), $CellContext`x, 2, 1], StringForm["+`1`", DirectedInfinity[1]]], " "}}, 0]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074686304286*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"AV \[Congruent] \\!\\(TraditionalForm\\`x\\) = \ \\!\\(TraditionalForm\\`2\\)\"\>", StringForm["AV \[Congruent] `1` = `2`", $CellContext`x, 2], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.4360746863370867`*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \\\\\\\"+\ \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\[Infinity]\\\\\\\\)\\\\\\\"\ \\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\(\\\\(3\\\\\\\\ \ x\\\\^2\\\\)\\\\) + \\\\(\\\\(2\\\\\\\\ x\\\\)\\\\) - 1\\\\)\\\\/\\\\(x\\\\^2 \ - x - 2\\\\)\\\\)\\\"\\)\\) = \\!\\(TraditionalForm\\`3\\)\"\>", StringForm["`1` = `2`", analyse`Limite[(-2 - $CellContext`x + $CellContext`x^2)^(-1) (-1 + 2 $CellContext`x + 3 $CellContext`x^2), $CellContext`x, DirectedInfinity[1]], 3], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074686371416*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \ \\\\(\\\\(-\\\\[Infinity]\\\\)\\\\)\\\\)\\\\) \ \\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\(\\\\(3\\\\\\\\ x\\\\^2\\\\)\\\\) + \\\ \\(\\\\(2\\\\\\\\ x\\\\)\\\\) - 1\\\\)\\\\/\\\\(x\\\\^2 - x - 2\\\\)\\\\)\\\"\ \\)\\) = \\!\\(TraditionalForm\\`3\\)\"\>", StringForm["`1` = `2`", analyse`Limite[(-2 - $CellContext`x + $CellContext`x^2)^(-1) (-1 + 2 $CellContext`x + 3 $CellContext`x^2), $CellContext`x, DirectedInfinity[-1]], 3], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074686404104*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\"AH\"\>", "\[InvisibleSpace]", "\<\" \[Congruent] \"\>", "\[InvisibleSpace]", RowBox[{"y", "\[LongEqual]", "3"}]}], SequenceForm["AH", " \[Congruent] ", $CellContext`y == 3], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074686437962*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ "9", "\[InvisibleSpace]", "\<\". Dom f = \"\>", "\[InvisibleSpace]", FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\*TagBox[\\\"\ \[DoubleStruckCapitalR]\\\", Function[List[], Reals]]\\) \\\\ \ {\\!\\(TraditionalForm\\`\\(-3\\)\\),\\!\\(TraditionalForm\\`3\\/2\\)}\"\>", StringForm["`1` \\ {`2`,`3`}", Reals, -3, Rational[3, 2]], Editable->False], TraditionalForm]}], SequenceForm[9, ". Dom f = ", analyse`Ens[ Or[$CellContext`x < -3, Inequality[-3, Less, $CellContext`x, Less, Rational[3, 2]], $CellContext`x > Rational[3, 2]], $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074686471487*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \ \\\\(\\\\(-3\\\\)\\\\)\\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\(x\\\\^2 + \ \\\\(\\\\(2\\\\\\\\ x\\\\)\\\\) - 3\\\\)\\\\/\\\\(\\\\(\\\\(2\\\\\\\\ x\\\\^2\ \\\\)\\\\) + \\\\(\\\\(3\\\\\\\\ x\\\\)\\\\) - 9\\\\)\\\\)\\\"\\)\\) = \ \\!\\(TraditionalForm\\`4\\/9\\)\"\>", StringForm["`1` = `2`", analyse`Limite[(-3 + 2 $CellContext`x + $CellContext`x^2)/(-9 + 3 $CellContext`x + 2 $CellContext`x^2), $CellContext`x, -3], Rational[4, 9]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074686504223*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(\[Piecewise] \ \\*GridBox[{{\\\"\\\\\\\"\\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\(\ TraditionalForm\\\\\\\\`\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(\ TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"lim\\\\\\\\\\\ \\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(x \\\ \\\\\\\\\\\\\\[Rule] \ 3\\\\\\\\\\\\\\\\/2\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\\\\\\\\\\ \\\\\\\"<\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\) \ \\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\ \\\\(x\\\\\\\\\\\\\\\\^2 + \ \\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(2\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ x\\\\\\\\\ \\\\\\\\)\\\\\\\\\\\\\\\\) - \ 3\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\/\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(\\\\\\\\\ \\\\\\\\(2\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ \ x\\\\\\\\\\\\\\\\^2\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\) + \\\\\\\\\\\\\\\\(\\\\\ \\\\\\\\\\\\(3\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ x\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\ \\\\) - 9\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\"\\\\\\\\)\\\\\\\\) \ = \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\(-\[Infinity]\\\\\\\\)\\\\\ \\\\)\\\\\\\"\\\", \\\"\\\\\\\" \\\\\\\"\\\"}, \ {\\\"\\\\\\\"\\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\(\ TraditionalForm\\\\\\\\`\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(\ TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"lim\\\\\\\\\\\ \\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(x \\\ \\\\\\\\\\\\\\[Rule] \ 3\\\\\\\\\\\\\\\\/2\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\\\\\\\\\\ \\\\\\\">\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\) \ \\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\ \\\\(x\\\\\\\\\\\\\\\\^2 + \ \\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(2\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ x\\\\\\\\\ \\\\\\\\)\\\\\\\\\\\\\\\\) - \ 3\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\/\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(\\\\\\\\\ \\\\\\\\(2\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ \ x\\\\\\\\\\\\\\\\^2\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\) + \\\\\\\\\\\\\\\\(\\\\\ \\\\\\\\\\\\(3\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ x\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\ \\\\) - 9\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\"\\\\\\\\)\\\\\\\\) \ = \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\\\\\\\\"+\\\\\\\\\\\\\\\\!\ \\\\\\\\\\\\\\\\(TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\\\\[Infinity]\\\ \\\\\\\\\\\\\\)\\\\\\\\\\\\\\\"\\\\\\\\)\\\\\\\"\\\", \\\"\\\\\\\" \ \\\\\\\"\\\"}}, ColumnAlignments -> {Left}, ColumnSpacings -> 1.2, \ ColumnWidths -> Automatic]\\)\\)\"\>", StringForm["`1`", Piecewise[{{ StringForm["`1` = `2`", analyse`Limite[(-3 + 2 $CellContext`x + $CellContext`x^2)/(-9 + 3 $CellContext`x + 2 $CellContext`x^2), $CellContext`x, Rational[3, 2], -1], DirectedInfinity[-1]], " "}, { StringForm["`1` = `2`", analyse`Limite[(-3 + 2 $CellContext`x + $CellContext`x^2)/(-9 + 3 $CellContext`x + 2 $CellContext`x^2), $CellContext`x, Rational[3, 2], 1], StringForm["+`1`", DirectedInfinity[1]]], " "}}, 0]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.4360746865424967`*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"AV \[Congruent] \\!\\(TraditionalForm\\`x\\) = \ \\!\\(TraditionalForm\\`3\\/2\\)\"\>", StringForm["AV \[Congruent] `1` = `2`", $CellContext`x, Rational[3, 2]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074686571478*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \\\\\\\"+\ \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\[Infinity]\\\\\\\\)\\\\\\\"\ \\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\(x\\\\^2 + \\\\(\\\\(2\\\\\\\\ x\ \\\\)\\\\) - 3\\\\)\\\\/\\\\(\\\\(\\\\(2\\\\\\\\ x\\\\^2\\\\)\\\\) + \ \\\\(\\\\(3\\\\\\\\ x\\\\)\\\\) - 9\\\\)\\\\)\\\"\\)\\) = \ \\!\\(TraditionalForm\\`1\\/2\\)\"\>", StringForm["`1` = `2`", analyse`Limite[(-3 + 2 $CellContext`x + $CellContext`x^2)/(-9 + 3 $CellContext`x + 2 $CellContext`x^2), $CellContext`x, DirectedInfinity[1]], Rational[1, 2]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074686605413*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \ \\\\(\\\\(-\\\\[Infinity]\\\\)\\\\)\\\\)\\\\) \ \\\\!\\\\(TraditionalForm\\\\`\\\\(x\\\\^2 + \\\\(\\\\(2\\\\\\\\ x\\\\)\\\\) \ - 3\\\\)\\\\/\\\\(\\\\(\\\\(2\\\\\\\\ x\\\\^2\\\\)\\\\) + \\\\(\\\\(3\\\\\\\\ \ x\\\\)\\\\) - 9\\\\)\\\\)\\\"\\)\\) = \\!\\(TraditionalForm\\`1\\/2\\)\"\>", StringForm["`1` = `2`", analyse`Limite[(-3 + 2 $CellContext`x + $CellContext`x^2)/(-9 + 3 $CellContext`x + 2 $CellContext`x^2), $CellContext`x, DirectedInfinity[-1]], Rational[1, 2]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074686638928*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\"AH\"\>", "\[InvisibleSpace]", "\<\" \[Congruent] \"\>", "\[InvisibleSpace]", RowBox[{"y", "\[LongEqual]", FractionBox["1", "2"]}]}], SequenceForm["AH", " \[Congruent] ", $CellContext`y == Rational[1, 2]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074686671694*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ "10", "\[InvisibleSpace]", "\<\". Dom f = \"\>", "\[InvisibleSpace]", FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\*TagBox[\\\"\ \[DoubleStruckCapitalR]\\\", Function[List[], Reals]]\\) \\\\ \ {\\!\\(TraditionalForm\\`\\(-1\\)\\),\\!\\(TraditionalForm\\`0\\),\\!\\(\ TraditionalForm\\`1\\)}\"\>", StringForm["`1` \\ {`2`,`3`,`4`}", Reals, -1, 0, 1], Editable->False], TraditionalForm]}], SequenceForm[10, ". Dom f = ", analyse`Ens[ Or[$CellContext`x < -1, Inequality[-1, Less, $CellContext`x, Less, 0], Inequality[0, Less, $CellContext`x, Less, 1], $CellContext`x > 1], $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.4360746867054033`*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(\[Piecewise] \ \\*GridBox[{{\\\"\\\\\\\"\\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\(\ TraditionalForm\\\\\\\\`\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(\ TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"lim\\\\\\\\\\\ \\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(x \\\ \\\\\\\\\\\\\\[Rule] \ \\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(-1\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\ \\\\\\\\)\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"<\\\\\\\\\\\\\\\\\\\ \\\\\\\\\\\\\"\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\) \ \\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\ \\\\(x\\\\\\\\\\\\\\\\^2 + x - \ 2\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\/\\\\\\\\\\\\\\\\(x - x\\\\\\\\\\\\\\\\^3\\\ \\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\"\\\\\\\\)\\\\\\\\) = \ \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\(-\[Infinity]\\\\\\\\)\\\\\\\ \\)\\\\\\\"\\\", \\\"\\\\\\\" \\\\\\\"\\\"}, \ {\\\"\\\\\\\"\\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\(\ TraditionalForm\\\\\\\\`\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(\ TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"lim\\\\\\\\\\\ \\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(x \\\ \\\\\\\\\\\\\\[Rule] \ \\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(-1\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\ \\\\\\\\)\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\">\\\\\\\\\\\\\\\\\\\ \\\\\\\\\\\\\"\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\) \ \\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\ \\\\(x\\\\\\\\\\\\\\\\^2 + x - \ 2\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\/\\\\\\\\\\\\\\\\(x - x\\\\\\\\\\\\\\\\^3\\\ \\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\"\\\\\\\\)\\\\\\\\) = \ \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\\\\\\\\"+\\\\\\\\\\\\\\\\!\\\ \\\\\\\\\\\\\\(TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\\\\[Infinity]\\\\\ \\\\\\\\\\\\)\\\\\\\\\\\\\\\"\\\\\\\\)\\\\\\\"\\\", \\\"\\\\\\\" \ \\\\\\\"\\\"}}, ColumnAlignments -> {Left}, ColumnSpacings -> 1.2, \ ColumnWidths -> Automatic]\\)\\)\"\>", StringForm["`1`", Piecewise[{{ StringForm["`1` = `2`", analyse`Limite[(-2 + $CellContext`x + \ $CellContext`x^2)/($CellContext`x - $CellContext`x^3), $CellContext`x, -1, \ -1], DirectedInfinity[-1]], " "}, { StringForm["`1` = `2`", analyse`Limite[(-2 + $CellContext`x + \ $CellContext`x^2)/($CellContext`x - $CellContext`x^3), $CellContext`x, -1, 1], StringForm["+`1`", DirectedInfinity[1]]], " "}}, 0]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074686738407*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"AV \[Congruent] \\!\\(TraditionalForm\\`x\\) = \ \\!\\(TraditionalForm\\`\\(-1\\)\\)\"\>", StringForm["AV \[Congruent] `1` = `2`", $CellContext`x, -1], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074686771687*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(\[Piecewise] \ \\*GridBox[{{\\\"\\\\\\\"\\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\(\ TraditionalForm\\\\\\\\`\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(\ TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"lim\\\\\\\\\\\ \\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(x \\\ \\\\\\\\\\\\\\[Rule] \ 0\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"<\\\\\\\\\\\ \\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\) \ \\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\ \\\\(x\\\\\\\\\\\\\\\\^2 + x - \ 2\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\/\\\\\\\\\\\\\\\\(x - x\\\\\\\\\\\\\\\\^3\\\ \\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\"\\\\\\\\)\\\\\\\\) = \ \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\\\\\\\\"+\\\\\\\\\\\\\\\\!\\\ \\\\\\\\\\\\\\(TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\\\\[Infinity]\\\\\ \\\\\\\\\\\\)\\\\\\\\\\\\\\\"\\\\\\\\)\\\\\\\"\\\", \\\"\\\\\\\" \ \\\\\\\"\\\"}, \ {\\\"\\\\\\\"\\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\(\ TraditionalForm\\\\\\\\`\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(\ TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"lim\\\\\\\\\\\ \\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(x \\\ \\\\\\\\\\\\\\[Rule] \ 0\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\">\\\\\\\\\\\ \\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\) \ \\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\ \\\\(x\\\\\\\\\\\\\\\\^2 + x - \ 2\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\/\\\\\\\\\\\\\\\\(x - x\\\\\\\\\\\\\\\\^3\\\ \\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\"\\\\\\\\)\\\\\\\\) = \ \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\(-\[Infinity]\\\\\\\\)\\\\\\\ \\)\\\\\\\"\\\", \\\"\\\\\\\" \\\\\\\"\\\"}}, ColumnAlignments -> {Left}, \ ColumnSpacings -> 1.2, ColumnWidths -> Automatic]\\)\\)\"\>", StringForm["`1`", Piecewise[{{ StringForm["`1` = `2`", analyse`Limite[(-2 + $CellContext`x + \ $CellContext`x^2)/($CellContext`x - $CellContext`x^3), $CellContext`x, 0, -1], StringForm["+`1`", DirectedInfinity[1]]], " "}, { StringForm["`1` = `2`", analyse`Limite[(-2 + $CellContext`x + \ $CellContext`x^2)/($CellContext`x - $CellContext`x^3), $CellContext`x, 0, 1], DirectedInfinity[-1]], " "}}, 0]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074686806631*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"AV \[Congruent] \\!\\(TraditionalForm\\`x\\) = \ \\!\\(TraditionalForm\\`0\\)\"\>", StringForm["AV \[Congruent] `1` = `2`", $CellContext`x, 0], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.4360746868390703`*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \ 1\\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\(x\\\\^2 + x - \ 2\\\\)\\\\/\\\\(x - x\\\\^3\\\\)\\\\)\\\"\\)\\) = \ \\!\\(TraditionalForm\\`\\(-\\(\\(3\\/2\\)\\)\\)\\)\"\>", StringForm["`1` = `2`", analyse`Limite[(-2 + $CellContext`x + $CellContext`x^2)/($CellContext`x - \ $CellContext`x^3), $CellContext`x, 1], Rational[-3, 2]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074686872448*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \\\\\\\"+\ \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\[Infinity]\\\\\\\\)\\\\\\\"\ \\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\(x\\\\^2 + x - 2\\\\)\\\\/\\\\(x \ - x\\\\^3\\\\)\\\\)\\\"\\)\\) = \\!\\(TraditionalForm\\`0\\)\"\>", StringForm["`1` = `2`", analyse`Limite[(-2 + $CellContext`x + $CellContext`x^2)/($CellContext`x - \ $CellContext`x^3), $CellContext`x, DirectedInfinity[1]], 0], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.4360746869064817`*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \ \\\\(\\\\(-\\\\[Infinity]\\\\)\\\\)\\\\)\\\\) \ \\\\!\\\\(TraditionalForm\\\\`\\\\(x\\\\^2 + x - 2\\\\)\\\\/\\\\(x - \ x\\\\^3\\\\)\\\\)\\\"\\)\\) = \\!\\(TraditionalForm\\`0\\)\"\>", StringForm["`1` = `2`", analyse`Limite[(-2 + $CellContext`x + $CellContext`x^2)/($CellContext`x - \ $CellContext`x^3), $CellContext`x, DirectedInfinity[-1]], 0], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074686939272*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\"AH\"\>", "\[InvisibleSpace]", "\<\" \[Congruent] \"\>", "\[InvisibleSpace]", RowBox[{"y", "\[LongEqual]", "0"}]}], SequenceForm["AH", " \[Congruent] ", $CellContext`y == 0], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074686973131*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ "11", "\[InvisibleSpace]", "\<\". Dom f = \"\>", "\[InvisibleSpace]", FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\*TagBox[\\\"\ \[DoubleStruckCapitalR]\\\", Function[List[], Reals]]\\) \\\\ \ {\\!\\(TraditionalForm\\`2\\)}\"\>", StringForm["`1` \\ {`2`}", Reals, 2], Editable->False], TraditionalForm]}], SequenceForm[11, ". Dom f = ", analyse`Ens[ Or[$CellContext`x < 2, $CellContext`x > 2], $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074687010825*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \ 2\\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\(\\\\(2\\\\\\\\ \ x\\\\^2\\\\)\\\\) - \\\\(\\\\(3\\\\\\\\ x\\\\)\\\\) - 2\\\\)\\\\/\\\\(2 - x\\\ \\)\\\\)\\\"\\)\\) = \\!\\(TraditionalForm\\`\\(-5\\)\\)\"\>", StringForm["`1` = `2`", analyse`Limite[(2 - $CellContext`x)^(-1) (-2 - 3 $CellContext`x + 2 $CellContext`x^2), $CellContext`x, 2], -5], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074687039812*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \\\\\\\"+\ \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\[Infinity]\\\\\\\\)\\\\\\\"\ \\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\(\\\\(2\\\\\\\\ \ x\\\\^2\\\\)\\\\) - \\\\(\\\\(3\\\\\\\\ x\\\\)\\\\) - 2\\\\)\\\\/\\\\(2 - x\\\ \\)\\\\)\\\"\\)\\) = \\!\\(TraditionalForm\\`\\(-\[Infinity]\\)\\)\"\>", StringForm["`1` = `2`", analyse`Limite[(2 - $CellContext`x)^(-1) (-2 - 3 $CellContext`x + 2 $CellContext`x^2), $CellContext`x, DirectedInfinity[1]], DirectedInfinity[-1]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074687073716*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \ \\\\(\\\\(-\\\\[Infinity]\\\\)\\\\)\\\\)\\\\) \ \\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\(\\\\(2\\\\\\\\ x\\\\^2\\\\)\\\\) - \\\ \\(\\\\(3\\\\\\\\ x\\\\)\\\\) - 2\\\\)\\\\/\\\\(2 - x\\\\)\\\\)\\\"\\)\\) = \ \\!\\(TraditionalForm\\`\\\"+\\\\!\\\\(TraditionalForm\\\\`\\\\[Infinity]\\\\)\ \\\"\\)\"\>", StringForm["`1` = `2`", analyse`Limite[(2 - $CellContext`x)^(-1) (-2 - 3 $CellContext`x + 2 $CellContext`x^2), $CellContext`x, DirectedInfinity[-1]], StringForm["+`1`", DirectedInfinity[1]]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.4360746871066427`*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\"AO\"\>", "\[InvisibleSpace]", "\<\" \[Congruent] \"\>", "\[InvisibleSpace]", RowBox[{"y", "\[LongEqual]", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", "x"}], "-", "1"}]}]}], SequenceForm[ "AO", " \[Congruent] ", $CellContext`y == -1 - 2 $CellContext`x], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074687140709*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ "12", "\[InvisibleSpace]", "\<\". Dom f = \"\>", "\[InvisibleSpace]", FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\ \\\\[LongLeftArrow], \ \\\\!\\\\(TraditionalForm\\\\`\\\\(-4\\\\)\\\\)]\\\"\\)\\) \[Union] \ \\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"[\\\\!\\\\(TraditionalForm\\\ \\`5\\\\), \\\\[LongRightArrow]\\\"\\)\\)\"\>", StringForm["`1` \[Union] `2`", analyse`Ens[$CellContext`x <= -4, $CellContext`x], analyse`Ens[$CellContext`x >= 5, $CellContext`x]], Editable->False], TraditionalForm]}], SequenceForm[12, ". Dom f = ", analyse`Ens[ Or[$CellContext`x <= -4, $CellContext`x >= 5], $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074687173615*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \ \\\\(\\\\(-4\\\\)\\\\)\\\\)\\\\) \ \\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\@\\\\(x\\\\^2 + x - 12\\\\) - \ \\\\@\\\\(x\\\\^2 - \\\\(\\\\(3\\\\\\\\ x\\\\)\\\\) - \ 10\\\\)\\\\)\\\\)\\\"\\)\\) = \\!\\(TraditionalForm\\`\\(\\(\\(-3\\)\\)\\\\ \ \\@2\\)\\)\"\>", StringForm["`1` = `2`", analyse`Limite[-(-10 - 3 $CellContext`x + $CellContext`x^2)^ Rational[1, 2] + (-12 + $CellContext`x + $CellContext`x^2)^ Rational[1, 2], $CellContext`x, -4], (-3) 2^Rational[1, 2]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074687207595*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \ 5\\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\@\\\\(x\\\\^2 + x - \ 12\\\\) - \\\\@\\\\(x\\\\^2 - \\\\(\\\\(3\\\\\\\\ x\\\\)\\\\) - \ 10\\\\)\\\\)\\\\)\\\"\\)\\) = \\!\\(TraditionalForm\\`\\(3\\\\ \ \\@2\\)\\)\"\>", StringForm["`1` = `2`", analyse`Limite[-(-10 - 3 $CellContext`x + $CellContext`x^2)^ Rational[1, 2] + (-12 + $CellContext`x + $CellContext`x^2)^ Rational[1, 2], $CellContext`x, 5], 3 2^Rational[1, 2]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074687240561*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \\\\\\\"+\ \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\[Infinity]\\\\\\\\)\\\\\\\"\ \\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\@\\\\(x\\\\^2 + x - 12\\\\) \ - \\\\@\\\\(x\\\\^2 - \\\\(\\\\(3\\\\\\\\ x\\\\)\\\\) - 10\\\\)\\\\)\\\\)\\\"\ \\)\\) = \\!\\(TraditionalForm\\`2\\)\"\>", StringForm["`1` = `2`", analyse`Limite[-(-10 - 3 $CellContext`x + $CellContext`x^2)^ Rational[1, 2] + (-12 + $CellContext`x + $CellContext`x^2)^ Rational[1, 2], $CellContext`x, DirectedInfinity[1]], 2], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074687273984*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \ \\\\(\\\\(-\\\\[Infinity]\\\\)\\\\)\\\\)\\\\) \ \\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\@\\\\(x\\\\^2 + x - 12\\\\) - \ \\\\@\\\\(x\\\\^2 - \\\\(\\\\(3\\\\\\\\ x\\\\)\\\\) - \ 10\\\\)\\\\)\\\\)\\\"\\)\\) = \\!\\(TraditionalForm\\`\\(-2\\)\\)\"\>", StringForm["`1` = `2`", analyse`Limite[-(-10 - 3 $CellContext`x + $CellContext`x^2)^ Rational[1, 2] + (-12 + $CellContext`x + $CellContext`x^2)^ Rational[1, 2], $CellContext`x, DirectedInfinity[-1]], -2], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074687308076*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\"AH\"\>", "\[InvisibleSpace]", "\<\" \[Congruent] \"\>", "\[InvisibleSpace]", RowBox[{"y", "\[LongEqual]", "2"}], "\[InvisibleSpace]", "\<\" \[AGrave] droite\"\>"}], SequenceForm[ "AH", " \[Congruent] ", $CellContext`y == 2, " \[AGrave] droite"], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.4360746873406487`*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\"AH\"\>", "\[InvisibleSpace]", "\<\" \[Congruent] \"\>", "\[InvisibleSpace]", RowBox[{"y", "\[LongEqual]", RowBox[{"-", "2"}]}], "\[InvisibleSpace]", "\<\" \[AGrave] gauche\"\>"}], SequenceForm[ "AH", " \[Congruent] ", $CellContext`y == -2, " \[AGrave] gauche"], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074687374824*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ "13", "\[InvisibleSpace]", "\<\". Dom f = \"\>", "\[InvisibleSpace]", FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"[\ \\\\!\\\\(TraditionalForm\\\\`\\\\(-\\\\(\\\\(1\\\\/3\\\\)\\\\)\\\\)\\\\), \\\ \\!\\\\(TraditionalForm\\\\`5\\\\)[\\\"\\)\\) \[Union] \ \\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"]\\\\!\\\\(TraditionalForm\\\ \\`5\\\\), \\\\[LongRightArrow]\\\"\\)\\)\"\>", StringForm["`1` \[Union] `2`", analyse`Ens[ Inequality[ Rational[-1, 3], LessEqual, $CellContext`x, Less, 5], $CellContext`x], analyse`Ens[$CellContext`x > 5, $CellContext`x]], Editable->False], TraditionalForm]}], SequenceForm[13, ". Dom f = ", analyse`Ens[ Or[ Inequality[ Rational[-1, 3], LessEqual, $CellContext`x, Less, 5], $CellContext`x > 5], $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074687407625*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \ \\\\(\\\\(-\\\\(\\\\(1\\\\/3\\\\)\\\\)\\\\)\\\\)\\\\)\\\\) \ \\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\@\\\\(\\\\(\\\\(3\\\\\\\\ x\\\\)\\\\) \ + 1\\\\) - \\\\@\\\\(\\\\(\\\\(2\\\\\\\\ x\\\\)\\\\) + 6\\\\)\\\\)\\\\/\\\\(x \ - 5\\\\)\\\\)\\\"\\)\\) = \\!\\(TraditionalForm\\`\\@3\\/4\\)\"\>", StringForm["`1` = `2`", analyse`Limite[(-5 + $CellContext`x)^(-1) (-(6 + 2 $CellContext`x)^ Rational[1, 2] + (1 + 3 $CellContext`x)^ Rational[1, 2]), $CellContext`x, Rational[-1, 3]], Rational[1, 4] 3^Rational[1, 2]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.4360746874414988`*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \ 5\\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\@\\\\(\\\\(\\\\(3\\\\\\\\ \ x\\\\)\\\\) + 1\\\\) - \\\\@\\\\(\\\\(\\\\(2\\\\\\\\ x\\\\)\\\\) + \ 6\\\\)\\\\)\\\\/\\\\(x - 5\\\\)\\\\)\\\"\\)\\) = \ \\!\\(TraditionalForm\\`1\\/8\\)\"\>", StringForm["`1` = `2`", analyse`Limite[(-5 + $CellContext`x)^(-1) (-(6 + 2 $CellContext`x)^ Rational[1, 2] + (1 + 3 $CellContext`x)^ Rational[1, 2]), $CellContext`x, 5], Rational[1, 8]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074687479369*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \\\\\\\"+\ \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\[Infinity]\\\\\\\\)\\\\\\\"\ \\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\@\\\\(\\\\(\\\\(3\\\\\\\\ x\ \\\\)\\\\) + 1\\\\) - \\\\@\\\\(\\\\(\\\\(2\\\\\\\\ x\\\\)\\\\) + 6\\\\)\\\\)\ \\\\/\\\\(x - 5\\\\)\\\\)\\\"\\)\\) = \\!\\(TraditionalForm\\`0\\)\"\>", StringForm["`1` = `2`", analyse`Limite[(-5 + $CellContext`x)^(-1) (-(6 + 2 $CellContext`x)^ Rational[1, 2] + (1 + 3 $CellContext`x)^ Rational[1, 2]), $CellContext`x, DirectedInfinity[1]], 0], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074687507742*^9}], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \ \\\\(\\\\(-\\\\[Infinity]\\\\)\\\\)\\\\)\\\\) \ \\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\@\\\\(\\\\(\\\\(3\\\\\\\\ x\\\\)\\\\) \ + 1\\\\) - \\\\@\\\\(\\\\(\\\\(2\\\\\\\\ x\\\\)\\\\) + 6\\\\)\\\\)\\\\/\\\\(x \ - 5\\\\)\\\\)\\\"\\)\\) n'existe pas\"\>", StringForm["`1` `2`", analyse`Limite[(-5 + $CellContext`x)^(-1) (-(6 + 2 $CellContext`x)^ Rational[1, 2] + (1 + 3 $CellContext`x)^ Rational[1, 2]), $CellContext`x, DirectedInfinity[-1]], " n'existe pas"], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074687541233*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\"AH\"\>", "\[InvisibleSpace]", "\<\" \[Congruent] \"\>", "\[InvisibleSpace]", RowBox[{"y", "\[LongEqual]", "0"}], "\[InvisibleSpace]", "\<\" \[AGrave] droite\"\>"}], SequenceForm[ "AH", " \[Congruent] ", $CellContext`y == 0, " \[AGrave] droite"], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.436074687574939*^9}] }, Open ]] }, Open ]] }, Closed]] }, Open ]] }, WindowSize->{815, 866}, WindowMargins->{{147, Automatic}, {Automatic, 0}}, PrintingCopies->1, PrintingPageRange->{1, Automatic}, CellLabelAutoDelete->True, FrontEndVersion->"6.0 for Mac OS X x86 (32-bit) (May 21, 2008)", StyleDefinitions->"stylemath.nb" ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[590, 23, 150, 4, 39, "Subsection"], Cell[CellGroupData[{ Cell[765, 31, 8383, 282, 20, "Input", CellOpen->False], Cell[CellGroupData[{ Cell[9173, 317, 481, 14, 35, "Print"], Cell[9657, 333, 571, 16, 35, "Print"], Cell[10231, 351, 535, 15, 45, "Print"], Cell[10769, 368, 532, 15, 45, "Print"], Cell[11304, 385, 552, 16, 47, "Print"], Cell[11859, 403, 538, 15, 45, "Print"], Cell[12400, 420, 528, 15, 45, "Print"], Cell[12931, 437, 593, 16, 47, "Print"], Cell[13527, 455, 617, 17, 47, "Print"], Cell[14147, 474, 513, 14, 47, "Print"], Cell[14663, 490, 540, 15, 45, "Print"], Cell[15206, 507, 642, 18, 35, "Print"], Cell[15851, 527, 630, 18, 48, "Print"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[16530, 551, 34, 0, 28, "Subsubsection"], Cell[CellGroupData[{ Cell[16589, 555, 9138, 305, 20, "Input", CellOpen->False], Cell[CellGroupData[{ Cell[25752, 864, 508, 14, 24, "Print"], Cell[26263, 880, 602, 12, 41, "Print"], Cell[26868, 894, 679, 12, 41, "Print"], Cell[27550, 908, 626, 12, 41, "Print"], Cell[28179, 922, 418, 10, 24, "Print"], Cell[28600, 934, 859, 20, 24, "Print"], Cell[29462, 956, 685, 12, 42, "Print"], Cell[30150, 970, 669, 12, 42, "Print"], Cell[30822, 984, 782, 14, 42, "Print"], Cell[31607, 1000, 829, 17, 42, "Print"], Cell[32439, 1019, 439, 11, 24, "Print"], Cell[32881, 1032, 625, 16, 24, "Print"], Cell[33509, 1050, 3103, 50, 93, "Print"], Cell[36615, 1102, 294, 6, 24, "Print"], Cell[36912, 1110, 836, 16, 45, "Print"], Cell[37751, 1128, 719, 14, 45, "Print"], Cell[38473, 1144, 415, 11, 24, "Print"], Cell[38891, 1157, 775, 19, 42, "Print"], Cell[39669, 1178, 3093, 50, 87, "Print"], Cell[42765, 1230, 294, 6, 24, "Print"], Cell[43062, 1238, 681, 14, 53, "Print"], Cell[43746, 1254, 725, 13, 45, "Print"], Cell[44474, 1269, 673, 13, 45, "Print"], Cell[45150, 1284, 340, 8, 24, "Print"], Cell[45493, 1294, 625, 16, 24, "Print"], Cell[46121, 1312, 2969, 52, 93, "Print"], Cell[49093, 1366, 294, 6, 24, "Print"], Cell[49390, 1374, 831, 18, 47, "Print"], Cell[50224, 1394, 712, 15, 47, "Print"], Cell[50939, 1411, 388, 10, 24, "Print"], Cell[51330, 1423, 614, 16, 24, "Print"], Cell[51947, 1441, 626, 11, 45, "Print"], Cell[52576, 1454, 770, 14, 45, "Print"], Cell[53349, 1470, 787, 16, 45, "Print"], Cell[54139, 1488, 438, 12, 24, "Print"], Cell[54580, 1502, 736, 19, 24, "Print"], Cell[55319, 1523, 3095, 52, 87, "Print"], Cell[58417, 1577, 294, 6, 24, "Print"], Cell[58714, 1585, 3095, 52, 87, "Print"], Cell[61812, 1639, 294, 6, 24, "Print"], Cell[62109, 1647, 720, 13, 45, "Print"], Cell[62832, 1662, 672, 13, 45, "Print"], Cell[63507, 1677, 338, 8, 24, "Print"], Cell[63848, 1687, 721, 18, 24, "Print"], Cell[64572, 1707, 696, 13, 47, "Print"], Cell[65271, 1722, 3045, 48, 93, "Print"], Cell[68319, 1772, 288, 6, 24, "Print"], Cell[68610, 1780, 759, 13, 47, "Print"], Cell[69372, 1795, 709, 13, 47, "Print"], Cell[70084, 1810, 338, 8, 24, "Print"], Cell[70425, 1820, 773, 19, 42, "Print"], Cell[71201, 1841, 720, 13, 47, "Print"], Cell[71924, 1856, 3337, 56, 113, "Print"], Cell[75264, 1914, 308, 7, 42, "Print"], Cell[75575, 1923, 809, 15, 47, "Print"], Cell[76387, 1940, 757, 14, 47, "Print"], Cell[77147, 1956, 375, 9, 42, "Print"], Cell[77525, 1967, 816, 20, 24, "Print"], Cell[78344, 1989, 2730, 48, 93, "Print"], Cell[81077, 2039, 294, 6, 24, "Print"], Cell[81374, 2047, 2593, 46, 93, "Print"], Cell[83970, 2095, 288, 6, 24, "Print"], Cell[84261, 2103, 607, 12, 47, "Print"], Cell[84871, 2117, 676, 12, 47, "Print"], Cell[85550, 2131, 624, 12, 47, "Print"], Cell[86177, 2145, 338, 8, 24, "Print"], Cell[86518, 2155, 617, 16, 24, "Print"], Cell[87138, 2173, 626, 11, 45, "Print"], Cell[87767, 2186, 770, 14, 45, "Print"], Cell[88540, 2202, 789, 16, 45, "Print"], Cell[89332, 2220, 438, 12, 24, "Print"], Cell[89773, 2234, 861, 20, 24, "Print"], Cell[90637, 2256, 748, 14, 42, "Print"], Cell[91388, 2272, 708, 13, 42, "Print"], Cell[92099, 2287, 785, 14, 42, "Print"], Cell[92887, 2303, 743, 14, 42, "Print"], Cell[93633, 2319, 420, 10, 24, "Print"], Cell[94056, 2331, 439, 11, 24, "Print"], Cell[94498, 2344, 1040, 26, 43, "Print"], Cell[95541, 2372, 801, 14, 59, "Print"], Cell[96345, 2388, 717, 14, 48, "Print"], Cell[97065, 2404, 804, 14, 48, "Print"], Cell[97872, 2420, 751, 14, 48, "Print"], Cell[98626, 2436, 418, 10, 24, "Print"] }, Open ]] }, Open ]] }, Closed]] }, Open ]] } ] *) (* End of internal cache information *)