(* 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[ 193111, 4916] NotebookOptionsPosition[ 183908, 4795] NotebookOutlinePosition[ 184349, 4814] CellTagsIndexPosition[ 184306, 4811] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[CellGroupData[{ Cell["\<\ D\[EAcute]terminer les \[EAcute]ventuelles asymptotes des fonctions suivantes\ \ \>", "Section", CellChangeTimes->{ 3.4360753301653852`*^9},ExpressionUUID->"85737426-8297-44d6-bb43-\ aafa78d35bed"], Cell[TextData[{ "1) ", Cell[BoxData[ FormBox[ RowBox[{ RowBox[{"f", "(", "x", ")"}], "=", SqrtBox[ RowBox[{ SuperscriptBox["x", "2"], "-", RowBox[{"3", " ", "x"}], "+", "2"}]]}], TraditionalForm]], FormatType->"TraditionalForm",ExpressionUUID-> "c7dcb763-14fc-4da3-b58d-fca415d0f15d"] }], "Titre2", CellChangeTimes->{ 3.641727865504284*^9, {3.7445375763159103`*^9, 3.7445375801294403`*^9}},ExpressionUUID->"ad2ed5c8-f35a-4e26-a161-\ 807b8ed56685"], Cell[TextData[{ "2) ", Cell[BoxData[ FormBox[ RowBox[{ RowBox[{"f", "(", "x", ")"}], "=", FractionBox[ SqrtBox[ RowBox[{ SuperscriptBox["x", "2"], "-", "1"}]], RowBox[{"3", "-", "x"}]]}], TraditionalForm]], FormatType->"TraditionalForm",ExpressionUUID-> "d95725e8-4719-48a1-b9df-5eab2a09c41e"] }], "Titre2", CellChangeTimes->{ 3.641727865504284*^9, {3.744537722136269*^9, 3.7445377303839493`*^9}},ExpressionUUID->"6987991d-d633-48e7-b848-\ f11dbeddd1e5"], Cell[TextData[{ "3) ", Cell[BoxData[ FormBox[ RowBox[{ RowBox[{"f", "(", "x", ")"}], "=", "\[InvisibleSpace] ", RowBox[{ SqrtBox[ RowBox[{"x", "-", "1"}]], "-", SqrtBox["x"]}]}], TraditionalForm]], FormatType->"TraditionalForm",ExpressionUUID-> "12d338e2-6927-449c-9b6c-652f49613b19"] }], "Titre2", CellChangeTimes->{ 3.641727865504284*^9, {3.7445378145231247`*^9, 3.744537824789116*^9}, { 3.7445380095636*^9, 3.744538009563712*^9}},ExpressionUUID->"8b90cf7e-3826-4b50-bd6c-\ 731822185135"], Cell[TextData[{ "4) ", Cell[BoxData[ FormBox[ RowBox[{ RowBox[{"f", "(", "x", ")"}], "=", FractionBox["1", SqrtBox[ RowBox[{"4", "-", SuperscriptBox["x", "2"]}]]]}], TraditionalForm]], FormatType->"TraditionalForm",ExpressionUUID-> "ece364fc-7255-49ab-a50c-4b526dc15cd5"] }], "Titre2", CellChangeTimes->{ 3.641727865504284*^9, {3.7445378282502413`*^9, 3.7445378319767437`*^9}, { 3.744537874699346*^9, 3.744537874932313*^9}},ExpressionUUID->"ae532d0c-3da4-422d-b721-\ 3b8a6ca47b73"], Cell[TextData[{ "5) ", Cell[BoxData[ FormBox[ RowBox[{ RowBox[{"f", "(", "x", ")"}], "=", SqrtBox[ FractionBox[ RowBox[{"x", "-", "3"}], RowBox[{"x", "-", "4"}]]]}], TraditionalForm]], FormatType->"TraditionalForm",ExpressionUUID-> "df662b70-e065-4e2d-831f-387caf5392a4"] }], "Titre2", CellChangeTimes->{ 3.641727865504284*^9, {3.744537878321944*^9, 3.7445378970030603`*^9}},ExpressionUUID->"0bc630de-47a9-4166-8ce8-\ 74d4bb20a355"], Cell[TextData[{ "6) ", Cell[BoxData[ FormBox[ RowBox[{ RowBox[{"f", "(", "x", ")"}], "=", FractionBox[ RowBox[{ SqrtBox[ RowBox[{"x", "+", "7"}]], "-", "3"}], RowBox[{"x", "-", "2"}]]}], TraditionalForm]], FormatType->"TraditionalForm",ExpressionUUID-> "8194e3da-e25b-41f6-933c-437d757b6e0f"] }], "Titre2", CellChangeTimes->{ 3.641727865504284*^9, {3.7445378997044373`*^9, 3.744537908710965*^9}},ExpressionUUID->"a0e6e35a-86d3-4a4d-9c41-\ 8a6c7b2fd507"], Cell[TextData[{ "7) ", Cell[BoxData[ FormBox[ RowBox[{ RowBox[{"f", "(", "x", ")"}], "=", RowBox[{"x", "+", SqrtBox[ RowBox[{"x", "+", "5"}]]}]}], TraditionalForm]], FormatType->"TraditionalForm",ExpressionUUID-> "c1737b29-609a-41c1-906f-f9f80315d9fd"] }], "Titre2", CellChangeTimes->{ 3.641727865504284*^9, {3.744537912911646*^9, 3.744537923835005*^9}},ExpressionUUID->"fa6fd366-d7d4-454d-959c-\ 4e01a8598208"], Cell[TextData[{ "8) ", Cell[BoxData[ FormBox[ RowBox[{ RowBox[{"f", "(", "x", ")"}], "=", RowBox[{ SqrtBox[ RowBox[{ SuperscriptBox["x", "2"], "+", "1"}]], "-", "x"}]}], TraditionalForm]], FormatType->"TraditionalForm",ExpressionUUID-> "dd42f817-c594-40eb-b895-d096032b08f5"] }], "Titre2", CellChangeTimes->{ 3.641727865504284*^9, {3.7445379267684526`*^9, 3.744537941501313*^9}},ExpressionUUID->"35707ae8-1e7b-45ad-ab43-\ fa03078d8f8c"], Cell[TextData[{ "9) ", Cell[BoxData[ FormBox[ RowBox[{ RowBox[{"f", "(", "x", ")"}], "=", FractionBox[ RowBox[{"x", " ", RowBox[{"\[LeftBracketingBar]", RowBox[{"x", "-", "1"}], "\[RightBracketingBar]"}]}], RowBox[{ SuperscriptBox["x", "2"], "-", "1"}]]}], TraditionalForm]], FormatType->"TraditionalForm",ExpressionUUID-> "4a88f0d2-58cb-4c42-8921-5b2c29872ffb"] }], "Titre2", CellChangeTimes->{ 3.641727865504284*^9, {3.7445379444402122`*^9, 3.744537954633595*^9}},ExpressionUUID->"d2e96fae-86d6-43bf-a8e6-\ 7679748b8a17"], Cell[CellGroupData[{ Cell[TextData[{ "10) ", Cell[BoxData[ FormBox[ RowBox[{ RowBox[{"f", "(", "x", ")"}], "=", FractionBox[ RowBox[{"\[LeftBracketingBar]", RowBox[{ SuperscriptBox["x", "2"], "-", "x", "-", "2"}], "\[RightBracketingBar]"}], RowBox[{ RowBox[{"2", " ", "x"}], "+", "1"}]]}], TraditionalForm]], FormatType->"TraditionalForm",ExpressionUUID-> "fbf96852-c091-4a5f-9393-348855027aeb"] }], "Titre2", CellChangeTimes->{ 3.641727865504284*^9, {3.7445379572400713`*^9, 3.744537970977219*^9}},ExpressionUUID->"4eb1d86c-76d3-4569-b653-\ 999e4f645da7"], Cell["", "PageBreak", PageBreakBelow->True,ExpressionUUID->"a63f0290-9d6c-4f15-9f17-f651ceba8aea"] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell["Solutions", "Section",ExpressionUUID->"0a93e072-0862-4229-b8e2-4bb111e9b4fe"], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"n", "=", "10"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Do", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"Print", "[", RowBox[{"q", ",", "\"\<. Dom f = \>\"", ",", RowBox[{"Domaine", "[", RowBox[{ RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}]}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"AV", "[", RowBox[{ RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}], ";", "\[IndentingNewLine]", RowBox[{"AO", "[", RowBox[{ RowBox[{"f", "[", RowBox[{"x", ",", "q"}], "]"}], ",", "x"}], "]"}]}], ",", RowBox[{"{", RowBox[{"q", ",", "n"}], "}"}]}], "]"}], ";"}]}], "Input", CellOpen->False,ExpressionUUID->"42b755b3-f01a-426c-933a-c4681df6dfa5"], Cell[CellGroupData[{ Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ "1", "\[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[1, ". Dom f = ", analyse`Ens[ Or[$CellContext`x <= 1, $CellContext`x >= 2], $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.436075310363841*^9},ExpressionUUID->"0bc98a19-2a15-496a-ab74-\ 3066afe0e9c9"], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \ 1\\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\@\\\\(x\\\\^2 - \\\\(\\\\(3\\\\\ \\\\ x\\\\)\\\\) + 2\\\\)\\\\)\\\"\\)\\) = \\!\\(TraditionalForm\\`0\\)\"\>", StringForm["`1` = `2`", analyse`Limite[(2 - 3 $CellContext`x + $CellContext`x^2)^ Rational[1, 2], $CellContext`x, 1], 0], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.436075310382724*^9},ExpressionUUID->"1f53e467-f96a-4754-b692-\ d060f85a330a"], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \ 2\\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\@\\\\(x\\\\^2 - \\\\(\\\\(3\\\\\ \\\\ x\\\\)\\\\) + 2\\\\)\\\\)\\\"\\)\\) = \\!\\(TraditionalForm\\`0\\)\"\>", StringForm["`1` = `2`", analyse`Limite[(2 - 3 $CellContext`x + $CellContext`x^2)^ Rational[1, 2], $CellContext`x, 2], 0], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.436075310418468*^9},ExpressionUUID->"112f2724-5001-4fb4-a33b-\ 7244d3e8416c"], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \\\\\\\"+\ \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\[Infinity]\\\\\\\\)\\\\\\\"\ \\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\@\\\\(x\\\\^2 - \ \\\\(\\\\(3\\\\\\\\ x\\\\)\\\\) + 2\\\\)\\\\)\\\"\\)\\) = \ \\!\\(TraditionalForm\\`\\\"+\\\\!\\\\(TraditionalForm\\\\`\\\\[Infinity]\\\\)\ \\\"\\)\"\>", StringForm["`1` = `2`", analyse`Limite[(2 - 3 $CellContext`x + $CellContext`x^2)^ Rational[1, 2], $CellContext`x, DirectedInfinity[1]], StringForm["+`1`", DirectedInfinity[1]]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.436075310460774*^9},ExpressionUUID->"3b886a96-fefc-4361-be81-\ c78e8ff91f4b"], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \ \\\\(\\\\(-\\\\[Infinity]\\\\)\\\\)\\\\)\\\\) \ \\\\!\\\\(TraditionalForm\\\\`\\\\@\\\\(x\\\\^2 - \\\\(\\\\(3\\\\\\\\ \ x\\\\)\\\\) + 2\\\\)\\\\)\\\"\\)\\) = \ \\!\\(TraditionalForm\\`\\\"+\\\\!\\\\(TraditionalForm\\\\`\\\\[Infinity]\\\\)\ \\\"\\)\"\>", StringForm["`1` = `2`", analyse`Limite[(2 - 3 $CellContext`x + $CellContext`x^2)^ Rational[1, 2], $CellContext`x, DirectedInfinity[-1]], StringForm["+`1`", DirectedInfinity[1]]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.4360753104799137`*^9},ExpressionUUID->"5b3565d5-ce1b-4e86-948b-\ bf195c9991ae"], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\"AO\"\>", "\[InvisibleSpace]", "\<\" \[Congruent] \"\>", "\[InvisibleSpace]", RowBox[{"y", "\[LongEqual]", RowBox[{"x", "-", FractionBox["3", "2"]}]}], "\[InvisibleSpace]", "\<\" \[AGrave] droite\"\>"}], SequenceForm[ "AO", " \[Congruent] ", $CellContext`y == Rational[-3, 2] + $CellContext`x, " \[AGrave] droite"], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.4360753105240173`*^9},ExpressionUUID->"7f72066d-ad36-4af4-a329-\ a4c0887bd913"], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\"AO\"\>", "\[InvisibleSpace]", "\<\" \[Congruent] \"\>", "\[InvisibleSpace]", RowBox[{"y", "\[LongEqual]", RowBox[{ FractionBox["3", "2"], "-", "x"}]}], "\[InvisibleSpace]", "\<\" \[AGrave] gauche\"\>"}], SequenceForm[ "AO", " \[Congruent] ", $CellContext`y == Rational[3, 2] - $CellContext`x, " \[AGrave] gauche"], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.436075310526455*^9},ExpressionUUID->"5d83a616-4b82-4867-ba9f-\ 40e83a559754"], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ "2", "\[InvisibleSpace]", "\<\". Dom f = \"\>", "\[InvisibleSpace]", FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\ \\\\[LongLeftArrow], \ \\\\!\\\\(TraditionalForm\\\\`\\\\(-1\\\\)\\\\)]\\\"\\)\\) \[Union] \ \\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\!\\\\(TraditionalForm\\\\\ `\\\\(TraditionalForm\\\\`\\\\\\\"[\\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\ 1\\\\\\\\), \ \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`3\\\\\\\\)[\\\\\\\"\\\\)\\\\) \ \\\\[Union] \ \\\\!\\\\(TraditionalForm\\\\`\\\\(TraditionalForm\\\\`\\\\\\\"]\\\\\\\\!\\\\\ \\\\(TraditionalForm\\\\\\\\`3\\\\\\\\), \ \\\\\\\\[LongRightArrow]\\\\\\\"\\\\)\\\\)\\\"\\)\\)\"\>", StringForm["`1` \[Union] `2`", analyse`Ens[$CellContext`x <= -1, $CellContext`x], analyse`Ens[ Or[ Inequality[1, LessEqual, $CellContext`x, Less, 3], $CellContext`x > 3], $CellContext`x]], Editable->False], TraditionalForm]}], SequenceForm[2, ". Dom f = ", analyse`Ens[ Or[$CellContext`x <= -1, Inequality[1, LessEqual, $CellContext`x, Less, 3], $CellContext`x > 3], $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.436075310541951*^9},ExpressionUUID->"b730d69f-8cd3-4731-9b8f-\ fb809b3152d1"], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \ \\\\(\\\\(-1\\\\)\\\\)\\\\)\\\\) \ \\\\!\\\\(TraditionalForm\\\\`\\\\@\\\\(x\\\\^2 - 1\\\\)\\\\/\\\\(3 - \ x\\\\)\\\\)\\\"\\)\\) = \\!\\(TraditionalForm\\`0\\)\"\>", StringForm["`1` = `2`", analyse`Limite[(3 - $CellContext`x)^(-1) (-1 + $CellContext`x^2)^ Rational[1, 2], $CellContext`x, -1], 0], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.436075310575726*^9},ExpressionUUID->"324f9c50-3a65-4126-8ff9-\ aacff4caa9a1"], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \ 1\\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\@\\\\(x\\\\^2 - \ 1\\\\)\\\\/\\\\(3 - x\\\\)\\\\)\\\"\\)\\) = \\!\\(TraditionalForm\\`0\\)\"\>", StringForm["`1` = `2`", analyse`Limite[(3 - $CellContext`x)^(-1) (-1 + $CellContext`x^2)^ Rational[1, 2], $CellContext`x, 1], 0], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.436075310621393*^9},ExpressionUUID->"887aee34-3387-4146-906a-\ f3a29ef6adc5"], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(\[Piecewise] \ \\*GridBox[{{\\\"\\\\\\\"\\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\(\ TraditionalForm\\\\\\\\`\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(\ TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"lim\\\\\\\\\\\ \\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(x \\\ \\\\\\\\\\\\\\[Rule] \ 3\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"<\\\\\\\\\\\ \\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\) \ \\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\ \\\\@\\\\\\\\\\\\\\\\(x\\\\\\\\\\\\\\\\^2 - \ 1\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\/\\\\\\\\\\\\\\\\(3 - \ x\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\"\\\\\\\\)\\\\\\\\) = \ \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\\\\\\\\"+\\\\\\\\\\\\\\\\!\\\ \\\\\\\\\\\\\\(TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\\\\[Infinity]\\\\\ \\\\\\\\\\\\)\\\\\\\\\\\\\\\"\\\\\\\\)\\\\\\\"\\\", \\\"\\\\\\\" \ \\\\\\\"\\\"}, \ {\\\"\\\\\\\"\\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\(\ TraditionalForm\\\\\\\\`\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(\ TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"lim\\\\\\\\\\\ \\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(x \\\ \\\\\\\\\\\\\\[Rule] \ 3\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\">\\\\\\\\\\\ \\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\) \ \\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\ \\\\@\\\\\\\\\\\\\\\\(x\\\\\\\\\\\\\\\\^2 - \ 1\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\/\\\\\\\\\\\\\\\\(3 - \ x\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\"\\\\\\\\)\\\\\\\\) = \ \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\(-\[Infinity]\\\\\\\\)\\\\\\\ \\)\\\\\\\"\\\", \\\"\\\\\\\" \\\\\\\"\\\"}}, ColumnAlignments -> {Left}, \ ColumnSpacings -> 1.2, ColumnWidths -> Automatic]\\)\\)\"\>", StringForm["`1`", Piecewise[{{ StringForm["`1` = `2`", analyse`Limite[(3 - $CellContext`x)^(-1) (-1 + $CellContext`x^2)^ Rational[1, 2], $CellContext`x, 3, -1], StringForm["+`1`", DirectedInfinity[1]]], " "}, { StringForm["`1` = `2`", analyse`Limite[(3 - $CellContext`x)^(-1) (-1 + $CellContext`x^2)^ Rational[1, 2], $CellContext`x, 3, 1], DirectedInfinity[-1]], " "}}, 0]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.4360753106804047`*^9},ExpressionUUID->"5a051e8c-1d93-4cfc-99ac-\ 6242b4a3e774"], Cell[BoxData[ FormBox[ InterpretationBox["\<\"AV \[Congruent] \\!\\(TraditionalForm\\`x\\) = \ \\!\\(TraditionalForm\\`3\\)\"\>", StringForm["AV \[Congruent] `1` = `2`", $CellContext`x, 3], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.436075310704034*^9},ExpressionUUID->"d1ac2cd1-c0e5-4f70-b4fa-\ 1b011de2aac9"], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \\\\\\\"+\ \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\[Infinity]\\\\\\\\)\\\\\\\"\ \\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\@\\\\(x\\\\^2 - \ 1\\\\)\\\\/\\\\(3 - x\\\\)\\\\)\\\"\\)\\) = \ \\!\\(TraditionalForm\\`\\(-1\\)\\)\"\>", StringForm["`1` = `2`", analyse`Limite[(3 - $CellContext`x)^(-1) (-1 + $CellContext`x^2)^ Rational[1, 2], $CellContext`x, DirectedInfinity[1]], -1], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.43607531073363*^9},ExpressionUUID->"835bd512-45a5-4049-9fa8-0606eb859255"], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \ \\\\(\\\\(-\\\\[Infinity]\\\\)\\\\)\\\\)\\\\) \ \\\\!\\\\(TraditionalForm\\\\`\\\\@\\\\(x\\\\^2 - 1\\\\)\\\\/\\\\(3 - \ x\\\\)\\\\)\\\"\\)\\) = \\!\\(TraditionalForm\\`1\\)\"\>", StringForm["`1` = `2`", analyse`Limite[(3 - $CellContext`x)^(-1) (-1 + $CellContext`x^2)^ Rational[1, 2], $CellContext`x, DirectedInfinity[-1]], 1], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.436075310763198*^9},ExpressionUUID->"7f3c2884-d531-4e40-bcc7-\ dde16223836f"], 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.436075310796479*^9},ExpressionUUID->"f3d41cce-1dd2-46ad-9b93-\ 7a4c35d7236c"], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\"AH\"\>", "\[InvisibleSpace]", "\<\" \[Congruent] \"\>", "\[InvisibleSpace]", RowBox[{"y", "\[LongEqual]", "1"}], "\[InvisibleSpace]", "\<\" \[AGrave] gauche\"\>"}], SequenceForm[ "AH", " \[Congruent] ", $CellContext`y == 1, " \[AGrave] gauche"], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.436075310829784*^9},ExpressionUUID->"174dc975-d4ef-4260-88ab-\ 9fa2518c7462"], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ "3", "\[InvisibleSpace]", "\<\". Dom f = \"\>", "\[InvisibleSpace]", FormBox[ InterpretationBox["\<\"[\\!\\(TraditionalForm\\`1\\), \ \[LongRightArrow]\"\>", StringForm["[`1`, \[LongRightArrow]", 1], Editable->False], TraditionalForm]}], SequenceForm[3, ". Dom f = ", analyse`Ens[$CellContext`x >= 1, $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.436075310863577*^9},ExpressionUUID->"359efcc1-19dd-4d76-be3b-\ eac7151cf9fe"], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \ 1\\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\@\\\\(x - 1\\\\) - \ \\\\@x\\\\)\\\\)\\\"\\)\\) = \\!\\(TraditionalForm\\`\\(-1\\)\\)\"\>", StringForm["`1` = `2`", analyse`Limite[(-1 + $CellContext`x)^Rational[1, 2] - $CellContext`x^ Rational[1, 2], $CellContext`x, 1], -1], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.43607531089742*^9},ExpressionUUID->"dd2ee7e5-2478-4944-a333-3f4ba7bbdb7b"], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \\\\\\\"+\ \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\[Infinity]\\\\\\\\)\\\\\\\"\ \\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\@\\\\(x - 1\\\\) - \\\\@x\\\ \\)\\\\)\\\"\\)\\) = \\!\\(TraditionalForm\\`0\\)\"\>", StringForm["`1` = `2`", analyse`Limite[(-1 + $CellContext`x)^Rational[1, 2] - $CellContext`x^ Rational[1, 2], $CellContext`x, DirectedInfinity[1]], 0], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.4360753109299707`*^9},ExpressionUUID->"f781f54d-214a-4669-80a3-\ 105fa3c590c1"], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \ \\\\(\\\\(-\\\\[Infinity]\\\\)\\\\)\\\\)\\\\) \ \\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\@\\\\(x - 1\\\\) - \ \\\\@x\\\\)\\\\)\\\"\\)\\) n'existe pas\"\>", StringForm["`1` `2`", analyse`Limite[(-1 + $CellContext`x)^Rational[1, 2] - $CellContext`x^ Rational[1, 2], $CellContext`x, DirectedInfinity[-1]], " n'existe pas"], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.436075310963605*^9},ExpressionUUID->"259d6714-0dec-47c5-b685-\ 0f81f7020436"], 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.436075310996917*^9},ExpressionUUID->"9bc665ef-a256-4cfe-8acb-\ da6143e056ac"], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ "4", "\[InvisibleSpace]", "\<\". Dom f = \"\>", "\[InvisibleSpace]", FormBox[ InterpretationBox["\<\"]\\!\\(TraditionalForm\\`\\(-2\\)\\), \ \\!\\(TraditionalForm\\`2\\)[\"\>", StringForm["]`1`, `2`[", -2, 2], Editable->False], TraditionalForm]}], SequenceForm[4, ". Dom f = ", analyse`Ens[ Inequality[-2, Less, $CellContext`x, Less, 2], $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.436075311031287*^9},ExpressionUUID->"4d08f233-d279-4ceb-ad9a-\ 70d9820267b3"], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(\\\\(x \\\\[Rule] \ \\\\(\\\\(-2\\\\)\\\\)\\\\)\\\\+\\\\\\\">\\\\\\\"\\\\)\\\\) \ \\\\!\\\\(TraditionalForm\\\\`1\\\\/\\\\@\\\\(4 - x\\\\^2\\\\)\\\\)\\\"\\)\\) \ = \\!\\(TraditionalForm\\`\\\"+\\\\!\\\\(TraditionalForm\\\\`\\\\[Infinity]\\\ \\)\\\"\\)\"\>", StringForm["`1` = `2`", analyse`Limite[(4 - $CellContext`x^2)^Rational[-1, 2], $CellContext`x, -2, 1], StringForm["+`1`", DirectedInfinity[1]]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.436075311064438*^9},ExpressionUUID->"bb6c40d9-b9dc-48eb-8ba9-\ bb14ddd65853"], Cell[BoxData[ FormBox[ InterpretationBox["\<\"AV \[Congruent] \\!\\(TraditionalForm\\`x\\) = \ \\!\\(TraditionalForm\\`\\(-2\\)\\) a droite\"\>", StringForm["AV \[Congruent] `1` = `2` a droite", $CellContext`x, -2], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.436075311097616*^9},ExpressionUUID->"50f16281-20d6-4742-8c8c-\ 670fe08d4759"], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(\\\\(x \\\\[Rule] \ 2\\\\)\\\\+\\\\\\\"<\\\\\\\"\\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`1\\\\/\\\ \\@\\\\(4 - x\\\\^2\\\\)\\\\)\\\"\\)\\) = \ \\!\\(TraditionalForm\\`\\\"+\\\\!\\\\(TraditionalForm\\\\`\\\\[Infinity]\\\\)\ \\\"\\)\"\>", StringForm["`1` = `2`", analyse`Limite[(4 - $CellContext`x^2)^Rational[-1, 2], $CellContext`x, 2, -1], StringForm["+`1`", DirectedInfinity[1]]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.436075311131255*^9},ExpressionUUID->"ecd77712-f27d-4501-abe5-\ 618fed30e4b6"], Cell[BoxData[ FormBox[ InterpretationBox["\<\"AV \[Congruent] \\!\\(TraditionalForm\\`x\\) = \ \\!\\(TraditionalForm\\`2\\) a gauche\"\>", StringForm["AV \[Congruent] `1` = `2` a gauche", $CellContext`x, 2], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.436075311164418*^9},ExpressionUUID->"fd20c044-6116-4bc2-aa5e-\ 03ac8e6639a1"], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \\\\\\\"+\ \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\[Infinity]\\\\\\\\)\\\\\\\"\ \\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`1\\\\/\\\\@\\\\(4 - \ x\\\\^2\\\\)\\\\)\\\"\\)\\) n'existe pas\"\>", StringForm["`1` `2`", analyse`Limite[(4 - $CellContext`x^2)^Rational[-1, 2], $CellContext`x, DirectedInfinity[1]], " n'existe pas"], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.436075311201908*^9},ExpressionUUID->"93da6784-3704-4077-9928-\ 285786c52b53"], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \ \\\\(\\\\(-\\\\[Infinity]\\\\)\\\\)\\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`1\ \\\\/\\\\@\\\\(4 - x\\\\^2\\\\)\\\\)\\\"\\)\\) n'existe pas\"\>", StringForm["`1` `2`", analyse`Limite[(4 - $CellContext`x^2)^Rational[-1, 2], $CellContext`x, DirectedInfinity[-1]], " n'existe pas"], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.4360753112314796`*^9},ExpressionUUID->"e7671b97-be91-4829-81f3-\ 802fdf5d71a1"], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ "5", "\[InvisibleSpace]", "\<\". Dom f = \"\>", "\[InvisibleSpace]", FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\ \\\\[LongLeftArrow], \\\\!\\\\(TraditionalForm\\\\`3\\\\)]\\\"\\)\\) \[Union] \ \\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"]\\\\!\\\\(TraditionalForm\\\ \\`4\\\\), \\\\[LongRightArrow]\\\"\\)\\)\"\>", StringForm["`1` \[Union] `2`", analyse`Ens[$CellContext`x <= 3, $CellContext`x], analyse`Ens[$CellContext`x > 4, $CellContext`x]], Editable->False], TraditionalForm]}], SequenceForm[5, ". Dom f = ", analyse`Ens[ Or[$CellContext`x <= 3, $CellContext`x > 4], $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.436075311265265*^9},ExpressionUUID->"ad411d46-bdc6-43ee-9442-\ 98caec97ad24"], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \ 3\\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\@\\\\(\\\\(x - \ 3\\\\)\\\\/\\\\(x - 4\\\\)\\\\)\\\\)\\\"\\)\\) = \\!\\(TraditionalForm\\`0\\)\ \"\>", StringForm["`1` = `2`", analyse`Limite[((-4 + $CellContext`x)^(-1) (-3 + $CellContext`x))^ Rational[1, 2], $CellContext`x, 3], 0], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.436075311298521*^9},ExpressionUUID->"d1b89f19-6b8c-406c-bd84-\ 31c1273aaf46"], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(\\\\(x \\\\[Rule] \ 4\\\\)\\\\+\\\\\\\">\\\\\\\"\\\\)\\\\) \ \\\\!\\\\(TraditionalForm\\\\`\\\\@\\\\(\\\\(x - 3\\\\)\\\\/\\\\(x - 4\\\\)\\\ \\)\\\\)\\\"\\)\\) = \\!\\(TraditionalForm\\`\\\"+\\\\!\\\\(TraditionalForm\\\ \\`\\\\[Infinity]\\\\)\\\"\\)\"\>", StringForm["`1` = `2`", analyse`Limite[((-4 + $CellContext`x)^(-1) (-3 + $CellContext`x))^ Rational[1, 2], $CellContext`x, 4, 1], StringForm["+`1`", DirectedInfinity[1]]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.43607531133249*^9},ExpressionUUID->"aceb4a77-ef81-4544-b514-12941f8bf64c"], Cell[BoxData[ FormBox[ InterpretationBox["\<\"AV \[Congruent] \\!\\(TraditionalForm\\`x\\) = \ \\!\\(TraditionalForm\\`4\\) a droite\"\>", StringForm["AV \[Congruent] `1` = `2` a droite", $CellContext`x, 4], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.4360753113650417`*^9},ExpressionUUID->"139a20c9-32cd-41b3-993b-\ 79615eca731e"], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \\\\\\\"+\ \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\[Infinity]\\\\\\\\)\\\\\\\"\ \\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\@\\\\(\\\\(x - 3\\\\)\\\\/\\\\(x \ - 4\\\\)\\\\)\\\\)\\\"\\)\\) = \\!\\(TraditionalForm\\`1\\)\"\>", StringForm["`1` = `2`", analyse`Limite[((-4 + $CellContext`x)^(-1) (-3 + $CellContext`x))^ Rational[1, 2], $CellContext`x, DirectedInfinity[1]], 1], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.436075311399044*^9},ExpressionUUID->"de7ed6e6-ef73-44d4-9629-\ dab6ce2e81b4"], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \ \\\\(\\\\(-\\\\[Infinity]\\\\)\\\\)\\\\)\\\\) \ \\\\!\\\\(TraditionalForm\\\\`\\\\@\\\\(\\\\(x - 3\\\\)\\\\/\\\\(x - 4\\\\)\\\ \\)\\\\)\\\"\\)\\) = \\!\\(TraditionalForm\\`1\\)\"\>", StringForm["`1` = `2`", analyse`Limite[((-4 + $CellContext`x)^(-1) (-3 + $CellContext`x))^ Rational[1, 2], $CellContext`x, DirectedInfinity[-1]], 1], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.436075311432632*^9},ExpressionUUID->"d1075406-3e48-4d74-bccd-\ 6378c176399a"], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\"AH\"\>", "\[InvisibleSpace]", "\<\" \[Congruent] \"\>", "\[InvisibleSpace]", RowBox[{"y", "\[LongEqual]", "1"}]}], SequenceForm["AH", " \[Congruent] ", $CellContext`y == 1], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.43607531146596*^9},ExpressionUUID->"bb9b1bdb-3e54-4f75-9397-37772296eb5e"], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ "6", "\[InvisibleSpace]", "\<\". Dom f = \"\>", "\[InvisibleSpace]", FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"[\ \\\\!\\\\(TraditionalForm\\\\`\\\\(-7\\\\)\\\\), \ \\\\!\\\\(TraditionalForm\\\\`2\\\\)[\\\"\\)\\) \[Union] \ \\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"]\\\\!\\\\(TraditionalForm\\\ \\`2\\\\), \\\\[LongRightArrow]\\\"\\)\\)\"\>", StringForm["`1` \[Union] `2`", analyse`Ens[ Inequality[-7, LessEqual, $CellContext`x, Less, 2], $CellContext`x], analyse`Ens[$CellContext`x > 2, $CellContext`x]], Editable->False], TraditionalForm]}], SequenceForm[6, ". Dom f = ", analyse`Ens[ Or[ Inequality[-7, LessEqual, $CellContext`x, Less, 2], $CellContext`x > 2], $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.436075311499501*^9},ExpressionUUID->"ae3c1fa3-265d-4e87-a7ab-\ 9cddad16c5e8"], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \ \\\\(\\\\(-7\\\\)\\\\)\\\\)\\\\) \ \\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\@\\\\(x + 7\\\\) - 3\\\\)\\\\/\\\\(x - \ 2\\\\)\\\\)\\\"\\)\\) = \\!\\(TraditionalForm\\`1\\/3\\)\"\>", StringForm["`1` = `2`", analyse`Limite[(-2 + $CellContext`x)^(-1) (-3 + (7 + $CellContext`x)^ Rational[1, 2]), $CellContext`x, -7], Rational[1, 3]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.436075311532765*^9},ExpressionUUID->"6f51f979-8328-49d5-98d3-\ 2b616bbe0003"], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \ 2\\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\@\\\\(x + 7\\\\) - \ 3\\\\)\\\\/\\\\(x - 2\\\\)\\\\)\\\"\\)\\) = \ \\!\\(TraditionalForm\\`1\\/6\\)\"\>", StringForm["`1` = `2`", analyse`Limite[(-2 + $CellContext`x)^(-1) (-3 + (7 + $CellContext`x)^ Rational[1, 2]), $CellContext`x, 2], Rational[1, 6]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.4360753115665417`*^9},ExpressionUUID->"8cb44f3e-8274-4b47-9f82-\ 5e599f683c49"], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \\\\\\\"+\ \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\[Infinity]\\\\\\\\)\\\\\\\"\ \\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\@\\\\(x + 7\\\\) - 3\\\\)\\\ \\/\\\\(x - 2\\\\)\\\\)\\\"\\)\\) = \\!\\(TraditionalForm\\`0\\)\"\>", StringForm["`1` = `2`", analyse`Limite[(-2 + $CellContext`x)^(-1) (-3 + (7 + $CellContext`x)^ Rational[1, 2]), $CellContext`x, DirectedInfinity[1]], 0], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.436075311599187*^9},ExpressionUUID->"a4511eac-46ef-4e24-bac6-\ 3fbc3883d410"], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \ \\\\(\\\\(-\\\\[Infinity]\\\\)\\\\)\\\\)\\\\) \ \\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\@\\\\(x + 7\\\\) - 3\\\\)\\\\/\\\\(x - \ 2\\\\)\\\\)\\\"\\)\\) n'existe pas\"\>", StringForm["`1` `2`", analyse`Limite[(-2 + $CellContext`x)^(-1) (-3 + (7 + $CellContext`x)^ Rational[1, 2]), $CellContext`x, DirectedInfinity[-1]], " n'existe pas"], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.43607531163253*^9},ExpressionUUID->"54ba068a-c3df-4381-abc8-dcdc2030b1f6"], 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.4360753116708508`*^9},ExpressionUUID->"c4a91af7-adb7-473b-ba88-\ 8ba29c93fac2"], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ "7", "\[InvisibleSpace]", "\<\". Dom f = \"\>", "\[InvisibleSpace]", FormBox[ InterpretationBox["\<\"[\\!\\(TraditionalForm\\`\\(-5\\)\\), \ \[LongRightArrow]\"\>", StringForm["[`1`, \[LongRightArrow]", -5], Editable->False], TraditionalForm]}], SequenceForm[7, ". Dom f = ", analyse`Ens[$CellContext`x >= -5, $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.43607531169993*^9},ExpressionUUID->"f93b8684-77fb-4f7b-aa11-6241af6f7470"], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \ \\\\(\\\\(-5\\\\)\\\\)\\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\(x + \\\\@\ \\\\(x + 5\\\\)\\\\)\\\\)\\\"\\)\\) = \\!\\(TraditionalForm\\`\\(-5\\)\\)\"\>", StringForm["`1` = `2`", analyse`Limite[$CellContext`x + (5 + $CellContext`x)^ Rational[1, 2], $CellContext`x, -5], -5], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.4360753117330313`*^9},ExpressionUUID->"ee0efc99-a575-4d44-82d0-\ 7e7c5993ea60"], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \\\\\\\"+\ \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\[Infinity]\\\\\\\\)\\\\\\\"\ \\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\(x + \\\\@\\\\(x + 5\\\\)\\\\)\\\ \\)\\\"\\)\\) = \\!\\(TraditionalForm\\`\\\"+\\\\!\\\\(TraditionalForm\\\\`\\\ \\[Infinity]\\\\)\\\"\\)\"\>", StringForm["`1` = `2`", analyse`Limite[$CellContext`x + (5 + $CellContext`x)^ Rational[1, 2], $CellContext`x, DirectedInfinity[1]], StringForm["+`1`", DirectedInfinity[1]]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.436075311766612*^9},ExpressionUUID->"667835cc-f02c-45f1-8cc5-\ 96538266ed69"], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \ \\\\(\\\\(-\\\\[Infinity]\\\\)\\\\)\\\\)\\\\) \ \\\\!\\\\(TraditionalForm\\\\`\\\\(x + \\\\@\\\\(x + \ 5\\\\)\\\\)\\\\)\\\"\\)\\) n'existe pas\"\>", StringForm["`1` `2`", analyse`Limite[$CellContext`x + (5 + $CellContext`x)^ Rational[1, 2], $CellContext`x, DirectedInfinity[-1]], " n'existe pas"], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.43607531180063*^9},ExpressionUUID->"17801421-9859-46cd-a06f-b84e073ee323"], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ "8", "\[InvisibleSpace]", "\<\". Dom f = \"\>", "\[InvisibleSpace]", FormBox[ TagBox["\[DoubleStruckCapitalR]", Function[{}, Reals]], TraditionalForm]}], SequenceForm[8, ". Dom f = ", analyse`Ens[True, $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.436075311834262*^9},ExpressionUUID->"8c5f8562-e5ac-4c7f-835e-\ b4dbc0e868c2"], Cell[BoxData[ FormBox["\<\"pas d'asymptote verticale\"\>", TraditionalForm]], "Print", CellChangeTimes->{ 3.436075311867284*^9},ExpressionUUID->"87ea0f44-2a27-4fcf-953d-\ ca7f2e958eba"], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \\\\\\\"+\ \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\[Infinity]\\\\\\\\)\\\\\\\"\ \\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\@\\\\(x\\\\^2 + 1\\\\) - \ x\\\\)\\\\)\\\"\\)\\) = \\!\\(TraditionalForm\\`0\\)\"\>", StringForm["`1` = `2`", analyse`Limite[-$CellContext`x + (1 + $CellContext`x^2)^ Rational[1, 2], $CellContext`x, DirectedInfinity[1]], 0], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.4360753119011297`*^9},ExpressionUUID->"5933b78c-1cc1-4192-bf76-\ f2b8f4d8ff3c"], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \ \\\\(\\\\(-\\\\[Infinity]\\\\)\\\\)\\\\)\\\\) \ \\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\@\\\\(x\\\\^2 + 1\\\\) - x\\\\)\\\\)\\\ \"\\)\\) = \ \\!\\(TraditionalForm\\`\\\"+\\\\!\\\\(TraditionalForm\\\\`\\\\[Infinity]\\\\)\ \\\"\\)\"\>", StringForm["`1` = `2`", analyse`Limite[-$CellContext`x + (1 + $CellContext`x^2)^ Rational[1, 2], $CellContext`x, DirectedInfinity[-1]], StringForm["+`1`", DirectedInfinity[1]]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.436075311934043*^9},ExpressionUUID->"d3713e55-25d6-46bd-a933-\ 6b93032e9617"], 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.4360753119677477`*^9},ExpressionUUID->"2ba5e504-b610-40bc-b503-\ c485014f1dcc"], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ "9", "\[InvisibleSpace]", "\<\". Dom f = \"\>", "\[InvisibleSpace]", FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\*TagBox[\\\"\ \[DoubleStruckCapitalR]\\\", Function[List[], Reals]]\\) \\\\ \ {\\!\\(TraditionalForm\\`\\(-1\\)\\),\\!\\(TraditionalForm\\`1\\)}\"\>", StringForm["`1` \\ {`2`,`3`}", Reals, -1, 1], Editable->False], TraditionalForm]}], SequenceForm[9, ". Dom f = ", analyse`Ens[ Or[$CellContext`x < -1, Inequality[-1, Less, $CellContext`x, Less, 1], $CellContext`x > 1], $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.436075312001258*^9},ExpressionUUID->"2ee42a25-3471-41da-82e5-\ 2b704094248f"], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(\[Piecewise] \ \\*GridBox[{{\\\"\\\\\\\"\\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\(\ TraditionalForm\\\\\\\\`\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(\ TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"lim\\\\\\\\\\\ \\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(x \\\ \\\\\\\\\\\\\\[Rule] \ \\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(-1\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\ \\\\\\\\)\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"<\\\\\\\\\\\\\\\\\\\ \\\\\\\\\\\\\"\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\) \ \\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\ \\\\(x\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ \\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(\\\\\ \\\\\\\\\\\\[LeftBracketingBar] \\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(x - 1\\\\\\\ \\\\\\\\\\)\\\\\\\\\\\\\\\\) \\\\\\\\\\\\\\\\[RightBracketingBar]\\\\\\\\\\\\\ \\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\/\\\\\\\\\\\\\\\\(x\\\\\ \\\\\\\\\\\\^2 - 1\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\"\\\\\\\\)\ \\\\\\\\) = \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\(-\[Infinity]\\\ \\\\\\)\\\\\\\\)\\\\\\\"\\\", \\\"\\\\\\\" \\\\\\\"\\\"}, {\\\"\\\\\\\"\\\\\\\ \\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\\ \\\\\\\"\\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(TraditionalForm\\\\\\\\\\\\\\\\`\\\\\ \\\\\\\\\\\\\\\\\\\\\\\\\\\"lim\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\ \\+\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(x \\\\\\\\\\\\\\\\[Rule] \ \\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(-1\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\ \\\\\\\\)\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\">\\\\\\\\\\\\\\\\\\\ \\\\\\\\\\\\\"\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\) \ \\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\ \\\\(x\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ \\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(\\\\\ \\\\\\\\\\\\[LeftBracketingBar] \\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(x - 1\\\\\\\ \\\\\\\\\\)\\\\\\\\\\\\\\\\) \\\\\\\\\\\\\\\\[RightBracketingBar]\\\\\\\\\\\\\ \\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\/\\\\\\\\\\\\\\\\(x\\\\\ \\\\\\\\\\\\^2 - 1\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\"\\\\\\\\)\ \\\\\\\\) = \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\\\\\\\\"+\\\\\\\ \\\\\\\\\\!\\\\\\\\\\\\\\\\(TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\\\\[\ Infinity]\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\"\\\\\\\\)\\\\\\\"\\\", \\\"\\\\\\\" \ \\\\\\\"\\\"}}, ColumnAlignments -> {Left}, ColumnSpacings -> 1.2, \ ColumnWidths -> Automatic]\\)\\)\"\>", StringForm["`1`", Piecewise[{{ StringForm["`1` = `2`", analyse`Limite[($CellContext`x/(-1 + $CellContext`x^2)) Abs[-1 + $CellContext`x], $CellContext`x, -1, -1], DirectedInfinity[-1]], " "}, { StringForm["`1` = `2`", analyse`Limite[($CellContext`x/(-1 + $CellContext`x^2)) Abs[-1 + $CellContext`x], $CellContext`x, -1, 1], StringForm["+`1`", DirectedInfinity[1]]], " "}}, 0]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.436075312034005*^9},ExpressionUUID->"b99161c5-da95-4b23-8d60-\ 186e5307d181"], Cell[BoxData[ FormBox[ InterpretationBox["\<\"AV \[Congruent] \\!\\(TraditionalForm\\`x\\) = \ \\!\\(TraditionalForm\\`\\(-1\\)\\)\"\>", StringForm["AV \[Congruent] `1` = `2`", $CellContext`x, -1], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.4360753120682783`*^9},ExpressionUUID->"7a233f43-a374-4e98-bf5d-\ 92102ccd2b91"], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(\[Piecewise] \ \\*GridBox[{{\\\"\\\\\\\"\\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\(\ TraditionalForm\\\\\\\\`\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(\ TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"lim\\\\\\\\\\\ \\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(x \\\ \\\\\\\\\\\\\\[Rule] \ 1\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"<\\\\\\\\\\\ \\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\) \ \\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\ \\\\(x\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ \\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(\\\\\ \\\\\\\\\\\\[LeftBracketingBar] \\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(x - 1\\\\\\\ \\\\\\\\\\)\\\\\\\\\\\\\\\\) \\\\\\\\\\\\\\\\[RightBracketingBar]\\\\\\\\\\\\\ \\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\/\\\\\\\\\\\\\\\\(x\\\\\ \\\\\\\\\\\\^2 - 1\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\"\\\\\\\\)\ \\\\\\\\) = \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\(-\\\\\\\\(\\\\\ \\\\(1\\\\\\\\/2\\\\\\\\)\\\\\\\\)\\\\\\\\)\\\\\\\\)\\\\\\\"\\\", \ \\\"\\\\\\\" \\\\\\\"\\\"}, \ {\\\"\\\\\\\"\\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\(\ TraditionalForm\\\\\\\\`\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(\ TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"lim\\\\\\\\\\\ \\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(x \\\ \\\\\\\\\\\\\\[Rule] \ 1\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\">\\\\\\\\\\\ \\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\) \ \\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\ \\\\(x\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ \\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(\\\\\ \\\\\\\\\\\\[LeftBracketingBar] \\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(x - 1\\\\\\\ \\\\\\\\\\)\\\\\\\\\\\\\\\\) \\\\\\\\\\\\\\\\[RightBracketingBar]\\\\\\\\\\\\\ \\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\/\\\\\\\\\\\\\\\\(x\\\\\ \\\\\\\\\\\\^2 - 1\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\"\\\\\\\\)\ \\\\\\\\) = \ \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`1\\\\\\\\/2\\\\\\\\)\\\\\\\"\\\", \ \\\"\\\\\\\" \\\\\\\"\\\"}}, ColumnAlignments -> {Left}, ColumnSpacings -> \ 1.2, ColumnWidths -> Automatic]\\)\\)\"\>", StringForm["`1`", Piecewise[{{ StringForm["`1` = `2`", analyse`Limite[($CellContext`x/(-1 + $CellContext`x^2)) Abs[-1 + $CellContext`x], $CellContext`x, 1, -1], Rational[-1, 2]], " "}, { StringForm["`1` = `2`", analyse`Limite[($CellContext`x/(-1 + $CellContext`x^2)) Abs[-1 + $CellContext`x], $CellContext`x, 1, 1], Rational[1, 2]], " "}}, 0]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.4360753121014967`*^9},ExpressionUUID->"d9d45130-6c3f-4f73-ad97-\ a14f9f89a7cb"], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \\\\\\\"+\ \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\[Infinity]\\\\\\\\)\\\\\\\"\ \\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\(x\\\\\\\\ \ \\\\(\\\\(\\\\[LeftBracketingBar] \\\\(\\\\(x - 1\\\\)\\\\) \ \\\\[RightBracketingBar]\\\\)\\\\)\\\\)\\\\/\\\\(x\\\\^2 - 1\\\\)\\\\)\\\"\\)\ \\) = \\!\\(TraditionalForm\\`1\\)\"\>", StringForm["`1` = `2`", analyse`Limite[($CellContext`x/(-1 + $CellContext`x^2)) Abs[-1 + $CellContext`x], $CellContext`x, DirectedInfinity[1]], 1], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.436075312138877*^9},ExpressionUUID->"5628e986-64b4-4d11-ade6-\ 2a6167df57ca"], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \ \\\\(\\\\(-\\\\[Infinity]\\\\)\\\\)\\\\)\\\\) \ \\\\!\\\\(TraditionalForm\\\\`\\\\(x\\\\\\\\ \ \\\\(\\\\(\\\\[LeftBracketingBar] \\\\(\\\\(x - 1\\\\)\\\\) \ \\\\[RightBracketingBar]\\\\)\\\\)\\\\)\\\\/\\\\(x\\\\^2 - 1\\\\)\\\\)\\\"\\)\ \\) = \\!\\(TraditionalForm\\`\\(-1\\)\\)\"\>", StringForm["`1` = `2`", analyse`Limite[($CellContext`x/(-1 + $CellContext`x^2)) Abs[-1 + $CellContext`x], $CellContext`x, DirectedInfinity[-1]], -1], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.4360753121685343`*^9},ExpressionUUID->"2de2c3ed-e33b-48f8-8f70-\ 8884a7cf1517"], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\"AH\"\>", "\[InvisibleSpace]", "\<\" \[Congruent] \"\>", "\[InvisibleSpace]", RowBox[{"y", "\[LongEqual]", "1"}], "\[InvisibleSpace]", "\<\" \[AGrave] droite\"\>"}], SequenceForm[ "AH", " \[Congruent] ", $CellContext`y == 1, " \[AGrave] droite"], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.436075312201838*^9},ExpressionUUID->"4c600a9e-dc25-4b09-b5a4-\ eda7d0304d7a"], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\"AH\"\>", "\[InvisibleSpace]", "\<\" \[Congruent] \"\>", "\[InvisibleSpace]", RowBox[{"y", "\[LongEqual]", RowBox[{"-", "1"}]}], "\[InvisibleSpace]", "\<\" \[AGrave] gauche\"\>"}], SequenceForm[ "AH", " \[Congruent] ", $CellContext`y == -1, " \[AGrave] gauche"], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.436075312235013*^9},ExpressionUUID->"adf5c204-d3cd-4c3a-94e1-\ 1c7bb00fbcb3"], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ "10", "\[InvisibleSpace]", "\<\". Dom f = \"\>", "\[InvisibleSpace]", FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\*TagBox[\\\"\ \[DoubleStruckCapitalR]\\\", Function[List[], Reals]]\\) \\\\ \ {\\!\\(TraditionalForm\\`\\(-\\(\\(1\\/2\\)\\)\\)\\)}\"\>", StringForm["`1` \\ {`2`}", Reals, Rational[-1, 2]], Editable->False], TraditionalForm]}], SequenceForm[10, ". Dom f = ", analyse`Ens[ Or[$CellContext`x < Rational[-1, 2], $CellContext`x > Rational[-1, 2]], $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.4360753122690163`*^9},ExpressionUUID->"3ce170e6-b582-4ffd-9fc6-\ 758c5e9e441b"], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(\[Piecewise] \ \\*GridBox[{{\\\"\\\\\\\"\\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\(\ TraditionalForm\\\\\\\\`\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(\ TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"lim\\\\\\\\\\\ \\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(x \\\ \\\\\\\\\\\\\\[Rule] \\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(-\\\\\\\\\\\\\\\\(\\\\\ \\\\\\\\\\\\(1\\\\\\\\\\\\\\\\/2\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\ \\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\\\\\\\\ \\\\\\\\\"<\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\) \ \\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\ \\\\(\\\\\\\\\\\\\\\\[LeftBracketingBar] \ \\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(x\\\\\\\\\\\\\\\\^2 - x - \ 2\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\) \ \\\\\\\\\\\\\\\\[RightBracketingBar]\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\/\\\\\\\\\ \\\\\\\\(\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(2\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ \ x\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\) + 1\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\ \\\\\\\\\\\"\\\\\\\\)\\\\\\\\) = \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\ \\\\\\(-\[Infinity]\\\\\\\\)\\\\\\\\)\\\\\\\"\\\", \\\"\\\\\\\" \ \\\\\\\"\\\"}, \ {\\\"\\\\\\\"\\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\(\ TraditionalForm\\\\\\\\`\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(\ TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"lim\\\\\\\\\\\ \\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(x \\\ \\\\\\\\\\\\\\[Rule] \\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(-\\\\\\\\\\\\\\\\(\\\\\ \\\\\\\\\\\\(1\\\\\\\\\\\\\\\\/2\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\ \\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\+\\\\\\\\\\\\\\\\\\\\\\\ \\\\\\\\\">\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\) \ \\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\(TraditionalForm\\\\\\\\\\\\\\\\`\\\\\\\\\\\\\ \\\\(\\\\\\\\\\\\\\\\[LeftBracketingBar] \ \\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(x\\\\\\\\\\\\\\\\^2 - x - \ 2\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\) \ \\\\\\\\\\\\\\\\[RightBracketingBar]\\\\\\\\\\\\\\\\)\\\\\\\\\\\\\\\\/\\\\\\\\\ \\\\\\\\(\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\(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)^(-1) Abs[-2 - $CellContext`x + $CellContext`x^2], $CellContext`x, Rational[-1, 2], -1], DirectedInfinity[-1]], " "}, { StringForm["`1` = `2`", analyse`Limite[(1 + 2 $CellContext`x)^(-1) Abs[-2 - $CellContext`x + $CellContext`x^2], $CellContext`x, Rational[-1, 2], 1], StringForm["+`1`", DirectedInfinity[1]]], " "}}, 0]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.4360753123016033`*^9},ExpressionUUID->"743e8ff1-2234-4c53-975e-\ 4d31487d78c1"], Cell[BoxData[ FormBox[ InterpretationBox["\<\"AV \[Congruent] \\!\\(TraditionalForm\\`x\\) = \ \\!\\(TraditionalForm\\`\\(-\\(\\(1\\/2\\)\\)\\)\\)\"\>", StringForm["AV \[Congruent] `1` = `2`", $CellContext`x, Rational[-1, 2]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.4360753123352757`*^9},ExpressionUUID->"f50f391a-6bfd-4006-b37d-\ 46fd9a8e97e8"], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \\\\\\\"+\ \\\\\\\\!\\\\\\\\(TraditionalForm\\\\\\\\`\\\\\\\\[Infinity]\\\\\\\\)\\\\\\\"\ \\\\)\\\\) \\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\[LeftBracketingBar] \\\\(\\\ \\(x\\\\^2 - x - 2\\\\)\\\\) \ \\\\[RightBracketingBar]\\\\)\\\\/\\\\(\\\\(\\\\(2\\\\\\\\ x\\\\)\\\\) + \ 1\\\\)\\\\)\\\"\\)\\) = \ \\!\\(TraditionalForm\\`\\\"+\\\\!\\\\(TraditionalForm\\\\`\\\\[Infinity]\\\\)\ \\\"\\)\"\>", StringForm["`1` = `2`", analyse`Limite[(1 + 2 $CellContext`x)^(-1) Abs[-2 - $CellContext`x + $CellContext`x^2], $CellContext`x, DirectedInfinity[1]], StringForm["+`1`", DirectedInfinity[1]]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.436075312369051*^9},ExpressionUUID->"7a2aadf4-2c6d-4f4d-bb04-\ d6d2964c061d"], Cell[BoxData[ FormBox[ InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\\"\\\\\ !\\\\(TraditionalForm\\\\`\\\\\\\"lim\\\\\\\"\\\\+\\\\(x \\\\[Rule] \ \\\\(\\\\(-\\\\[Infinity]\\\\)\\\\)\\\\)\\\\) \ \\\\!\\\\(TraditionalForm\\\\`\\\\(\\\\[LeftBracketingBar] \\\\(\\\\(x\\\\^2 \ - x - 2\\\\)\\\\) \\\\[RightBracketingBar]\\\\)\\\\/\\\\(\\\\(\\\\(2\\\\\\\\ \ x\\\\)\\\\) + 1\\\\)\\\\)\\\"\\)\\) = \\!\\(TraditionalForm\\`\\(-\[Infinity]\ \\)\\)\"\>", StringForm["`1` = `2`", analyse`Limite[(1 + 2 $CellContext`x)^(-1) Abs[-2 - $CellContext`x + $CellContext`x^2], $CellContext`x, DirectedInfinity[-1]], DirectedInfinity[-1]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.4360753124023333`*^9},ExpressionUUID->"e92bf15b-db56-4769-a076-\ bdc6536718ee"], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\"AO\"\>", "\[InvisibleSpace]", "\<\" \[Congruent] \"\>", "\[InvisibleSpace]", RowBox[{"y", "\[LongEqual]", RowBox[{ FractionBox["x", "2"], "-", FractionBox["3", "4"]}]}]}], SequenceForm[ "AO", " \[Congruent] ", $CellContext`y == Rational[-3, 4] + Rational[1, 2] $CellContext`x], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.43607531243616*^9},ExpressionUUID->"a25dc6d3-8f1d-46d0-942a-c331d14f5053"] }, Open ]] }, Open ]], Cell["", "PageBreak", PageBreakBelow->True,ExpressionUUID->"aca3670a-cac1-4b4e-917d-5c4a90d1856c"] }, Open ]], Cell[CellGroupData[{ Cell[TextData[ButtonBox["Solutions d\[EAcute]taill\[EAcute]es (Claroline)", BaseStyle->"Hyperlink", ButtonData->{ URL["http://www.macformath.net/stus/claroline/backends/download.php?url=\ L0FuYWx5c2UvNV9Bc3ltcHRvdGVzL2FzeW1wdG90ZXNfc29sLnBkZg%3D%3D&cidReset=true&\ cidReq=SOLUTIONS"], None}, ButtonNote-> "http://www.macformath.net/stus/claroline/backends/download.php?url=\ L0FuYWx5c2UvNV9Bc3ltcHRvdGVzL2FzeW1wdG90ZXNfc29sLnBkZg%3D%3D&cidReset=true&\ cidReq=SOLUTIONS"]], "Section", CellChangeTimes->{{3.744537600076581*^9, 3.744537601441576*^9}, { 3.744538115785181*^9, 3.744538125992824*^9}, {3.7445404949574757`*^9, 3.7445404949613543`*^9}},ExpressionUUID->"3bf80c5e-1f5c-44ca-aa08-\ a0ea9bb1eb28"], Cell[TextData[{ "1) ", Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ StyleBox["\<\"f(x) = \"\>", StripOnInput->False, FontSlant->Italic], "\[InvisibleSpace]", SqrtBox[ RowBox[{ SuperscriptBox["x", "2"], "-", RowBox[{"3", " ", "x"}], "+", "2"}]]}], SequenceForm[ Style["f(x) = ", Italic], (2 - 3 $CellContext`x + $CellContext`x^2)^ Rational[1, 2]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.744537568656942*^9},ExpressionUUID-> "e51e274f-8b58-4bcf-8e3d-72057b02e0e3"], "\n", Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\"Dom f = \"\>", "\[InvisibleSpace]", FormBox[ InterpretationBox["\<\"\\!\\(\\*FormBox[FormBox[\\\"\\\\\\\"\ \[LongLeftArrow]; \ \\\\\\\\!\\\\\\\\(\\\\\\\\*FormBox[\\\\\\\\\\\\\\\"1\\\\\\\\\\\\\\\", \ TraditionalForm]\\\\\\\\)]\\\\\\\"\\\", TraditionalForm], TraditionalForm]\\) \ \[Union] \\!\\(\\*FormBox[FormBox[\\\"\\\\\\\"[\\\\\\\\!\\\\\\\\(\\\\\\\\*\ FormBox[\\\\\\\\\\\\\\\"2\\\\\\\\\\\\\\\", TraditionalForm]\\\\\\\\); \ \[LongRightArrow]\\\\\\\"\\\", TraditionalForm], TraditionalForm]\\)\"\>", StringForm["`1` \[Union] `2`", math`Ens[$CellContext`x <= 1, $CellContext`x], math`Ens[$CellContext`x >= 2, $CellContext`x]], Editable->False], TraditionalForm]}], SequenceForm["Dom f = ", math`Ens[ Or[$CellContext`x <= 1, $CellContext`x >= 2], $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.7445375686680813`*^9},ExpressionUUID-> "51bebeb4-9ed4-49d1-9097-2fe05773c406"], "\n", Cell[BoxData[ FormBox[ TemplateBox[{FormBox[ TemplateBox[{ UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", "1"}]], SqrtBox[ RowBox[{ SuperscriptBox["x", "2"], "-", RowBox[{"3", " ", "x"}], "+", "2"}]]}, "RowDefault"], TraditionalForm],"\" = \"","0"}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{3.744537568935317*^9},ExpressionUUID-> "6aac08ea-eb6f-4d4c-8ee9-111e41a1b8fc"], "\n", Cell[BoxData[ FormBox[ TemplateBox[{FormBox[ TemplateBox[{ UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", "2"}]], SqrtBox[ RowBox[{ SuperscriptBox["x", "2"], "-", RowBox[{"3", " ", "x"}], "+", "2"}]]}, "RowDefault"], TraditionalForm],"\" = \"","0"}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{3.744537569366005*^9},ExpressionUUID-> "dd8a2580-5c25-4771-bac0-eb818f91d483"], "\n\n", Cell[BoxData[ FormBox[ TemplateBox[{UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"", "\[Infinity]"}, "RowDefault"]}]],SqrtBox[ RowBox[{ SuperscriptBox["x", "2"], "-", RowBox[{"3", " ", "x"}], "+", "2"}]],"\" = \"",UnderscriptBox[ "\"lim \"", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"", "\[Infinity]"}, "RowDefault"]}]],SqrtBox[ SuperscriptBox["x", "2"]],"\" = \"",UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"", "\[Infinity]"}, "RowDefault"]}]],"x","\" = \"", UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"", "\[Infinity]"}, "RowDefault"]}]], InterpretationBox[ "\"+\\!\\(\\*FormBox[\\\"\[Infinity]\\\", TraditionalForm]\\)\"", StringForm["+`1`", DirectedInfinity[1]], Editable -> False]}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{3.744537569673374*^9},ExpressionUUID-> "f708122d-2f4e-4d28-9821-653d2bc7eba3"], "\n\n", Cell[BoxData[ FormBox[ TemplateBox[{UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]],SqrtBox[ RowBox[{ SuperscriptBox["x", "2"], "-", RowBox[{"3", " ", "x"}], "+", "2"}]],"\" = \"",UnderscriptBox[ "\"lim \"", RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]],SqrtBox[ SuperscriptBox["x", "2"]],"\" = \"",UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]],RowBox[{"-", "x"}],"\" = \"", UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]],InterpretationBox[ "\"+\\!\\(\\*FormBox[\\\"\[Infinity]\\\", TraditionalForm]\\)\"", StringForm["+`1`", DirectedInfinity[1]], Editable -> False]}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{3.7445375697141037`*^9},ExpressionUUID-> "29349dc5-86b7-40fc-a47a-28cefddc768c"], "\n", Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ StyleBox["\<\"a = \"\>", StripOnInput->False, FontSlant->Italic], "\[InvisibleSpace]", UnderscriptBox["\<\"lim \"\>", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"","\[Infinity]"}, "RowDefault"]}]], "\[InvisibleSpace]", TagBox[ FractionBox[ RowBox[{"f", RowBox[{"(", "x", ")"}]}], "x"], DisplayForm], "\[InvisibleSpace]", "\<\" = \"\>"}], SequenceForm[ Style["a = ", Italic], Underscript["lim ", $CellContext`x -> Row[{"+", DirectedInfinity[1]}]], DisplayForm[ FractionBox["f(x)", "x"]], " = "], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.744537569724071*^9},ExpressionUUID-> "d5facc6f-f063-4a7b-9e68-3add7392128b"], Cell[BoxData[ FormBox[ TemplateBox[{UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"", "\[Infinity]"}, "RowDefault"]}]],"\" \"", FractionBox[ SqrtBox[ RowBox[{ SuperscriptBox["x", "2"], "-", RowBox[{"3", " ", "x"}], "+", "2"}]], "x"],"\" = \"",UnderscriptBox[ "\"lim \"", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"", "\[Infinity]"}, "RowDefault"]}]],TagBox[ FractionBox[ SqrtBox[ SuperscriptBox["x", "2"]], "x"], DisplayForm],"\" = \"", UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"", "\[Infinity]"}, "RowDefault"]}]],TagBox[ FractionBox["x", "x"], DisplayForm],"\" = \"",UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"", "\[Infinity]"}, "RowDefault"]}]],"1","\" =\"", "1"}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{3.744537569732829*^9},ExpressionUUID-> "a2ab0625-68da-4365-a827-2a22480786fd"], "\n", Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ StyleBox["\<\"b = \"\>", StripOnInput->False, FontSlant->Italic], "\[InvisibleSpace]", UnderscriptBox["\<\"lim \"\>", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"","\[Infinity]"}, "RowDefault"]}]], "\[InvisibleSpace]", StyleBox["\<\"f(x) - a x = \"\>", StripOnInput->False, FontSlant->Italic]}], SequenceForm[ Style["b = ", Italic], Underscript["lim ", $CellContext`x -> Row[{"+", DirectedInfinity[1]}]], Style["f(x) - a x = ", Italic]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.744537569738893*^9},ExpressionUUID-> "6401355a-97ff-485e-b02d-0fea616d3a75"], Cell[BoxData[ FormBox[ TemplateBox[{UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"", "\[Infinity]"}, "RowDefault"]}]],RowBox[{ SqrtBox[ RowBox[{ SuperscriptBox["x", "2"], "-", RowBox[{"3", " ", "x"}], "+", "2"}]], "-", "x"}]}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{3.7445375697494783`*^9},ExpressionUUID-> "4b395576-abfd-4a36-888a-e7dfc19a4f38"], "\n", Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ FormBox[ TemplateBox[{UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"", "\[Infinity]"}, "RowDefault"]}]], InterpretationBox[ "\"\\!\\(\\*FormBox[SqrtBox[RowBox[{SuperscriptBox[\\\"x\\\", \\\"2\\\ \"], \\\"-\\\", RowBox[{\\\"3\\\", \\\" \\\", \\\"x\\\"}], \\\"+\\\", \\\"2\\\ \"}]], TraditionalForm]\\)- (\\!\\(\\*FormBox[\\\"x\\\", TraditionalForm]\\))\ \"", StringForm[ "`1`- (`2`)", (2 - 3 $CellContext`x + $CellContext`x^2)^ Rational[1, 2], $CellContext`x], Editable -> False]}, "RowDefault"], TraditionalForm], "\[InvisibleSpace]", "\<\" = [+\[Infinity] - \[Infinity]]\"\>"}], SequenceForm[ calculus`Limite[ StringForm[ "`1`- (`2`)", (2 - 3 $CellContext`x + $CellContext`x^2)^ Rational[1, 2], $CellContext`x], $CellContext`x, DirectedInfinity[1]], " = [+\[Infinity] - \[Infinity]]"], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.744537569753714*^9},ExpressionUUID-> "1ee2fd8e-ce45-456f-b3df-2b9dfe88b327"], "\n", Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\" = \"\>", "\[InvisibleSpace]", UnderscriptBox["\<\"lim \"\>", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"","\[Infinity]"}, "RowDefault"]}]], "\[InvisibleSpace]", TagBox[ FractionBox[ TemplateBox[{ InterpretationBox[ "\"\\!\\(\\*FormBox[SqrtBox[RowBox[{SuperscriptBox[\\\"x\\\", \ \\\"2\\\"], \\\"-\\\", RowBox[{\\\"3\\\", \\\" \\\", \\\"x\\\"}], \\\"+\\\", \ \\\"2\\\"}]], TraditionalForm]\\)- (\\!\\(\\*FormBox[\\\"x\\\", \ TraditionalForm]\\))\"", StringForm[ "`1`- (`2`)", (2 - 3 $CellContext`x + $CellContext`x^2)^ Rational[1, 2], $CellContext`x], Editable -> False],"\" \"", TemplateBox[{ SqrtBox[ RowBox[{ SuperscriptBox["x", "2"], "-", RowBox[{"3", " ", "x"}], "+", "2"}]], "\"+ (\"", "x", "\")\""}, "RowDefault"]}, "RowDefault"], TemplateBox[{SqrtBox[ RowBox[{ SuperscriptBox["x", "2"], "-", RowBox[{"3", " ", "x"}], "+", "2"}]],"\"+ (\"","x","\")\""}, "RowDefault"]], DisplayForm]}], SequenceForm[" = ", Underscript["lim ", $CellContext`x -> Row[{"+", DirectedInfinity[1]}]], DisplayForm[ FractionBox[ Row[{ StringForm[ "`1`- (`2`)", (2 - 3 $CellContext`x + $CellContext`x^2)^ Rational[1, 2], $CellContext`x], " ", Row[{(2 - 3 $CellContext`x + $CellContext`x^2)^Rational[1, 2], "+ (", $CellContext`x, ")"}]}], Row[{(2 - 3 $CellContext`x + $CellContext`x^2)^Rational[1, 2], "+ (", $CellContext`x, ")"}]]]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.744537569761458*^9},ExpressionUUID-> "31314e2c-a06e-48eb-aa8a-6c709e2e60c4"], "\n", Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\" = \"\>", "\[InvisibleSpace]", UnderscriptBox["\<\"lim \"\>", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"","\[Infinity]"}, "RowDefault"]}]], "\[InvisibleSpace]", TagBox[ FractionBox[ TemplateBox[{"\"(\"",RowBox[{ SuperscriptBox["x", "2"], "-", RowBox[{"3", " ", "x"}], "+", "2"}],"\") - (\"",SuperscriptBox[ "x", "2"],"\")\""}, "RowDefault"], TemplateBox[{SqrtBox[ RowBox[{ SuperscriptBox["x", "2"], "-", RowBox[{"3", " ", "x"}], "+", "2"}]],"\"+ (\"","x","\")\""}, "RowDefault"]], DisplayForm]}], SequenceForm[" = ", Underscript["lim ", $CellContext`x -> Row[{"+", DirectedInfinity[1]}]], DisplayForm[ FractionBox[ Row[{ "(", 2 - 3 $CellContext`x + $CellContext`x^2, ") - (", $CellContext`x^2, ")"}], Row[{(2 - 3 $CellContext`x + $CellContext`x^2)^Rational[1, 2], "+ (", $CellContext`x, ")"}]]]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.7445375697693663`*^9},ExpressionUUID-> "cc752ac4-3532-418a-9609-c63169ada344"], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\" = \"\>", "\[InvisibleSpace]", UnderscriptBox["\<\"lim \"\>", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"","\[Infinity]"}, "RowDefault"]}]], "\[InvisibleSpace]", TagBox[ FractionBox[ RowBox[{"2", "-", RowBox[{"3", " ", "x"}]}], TemplateBox[{SqrtBox[ RowBox[{ SuperscriptBox["x", "2"], "-", RowBox[{"3", " ", "x"}], "+", "2"}]],"\"+ (\"","x","\")\""}, "RowDefault"]], DisplayForm]}], SequenceForm[" = ", Underscript["lim ", $CellContext`x -> Row[{"+", DirectedInfinity[1]}]], DisplayForm[ FractionBox[2 - 3 $CellContext`x, Row[{(2 - 3 $CellContext`x + $CellContext`x^2)^Rational[1, 2], "+ (", $CellContext`x, ")"}]]]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.744537569775178*^9},ExpressionUUID-> "c3744b0c-4e03-4245-95f3-35fd076b5a3b"], "\n", Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\" = \"\>", "\[InvisibleSpace]", UnderscriptBox["\<\"lim \"\>", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"","\[Infinity]"}, "RowDefault"]}]], "\[InvisibleSpace]", TagBox[ FractionBox[ RowBox[{ RowBox[{"-", "3"}], " ", "x"}], RowBox[{"x", "+", SqrtBox[ SuperscriptBox["x", "2"]]}]], DisplayForm]}], SequenceForm[" = ", Underscript["lim ", $CellContext`x -> Row[{"+", DirectedInfinity[1]}]], DisplayForm[ FractionBox[(-3) $CellContext`x, $CellContext`x + ($CellContext`x^2)^ Rational[1, 2]]]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.744537569780141*^9},ExpressionUUID-> "f3af4370-c9eb-41f7-af86-05e9c94dc215"], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\" = \"\>", "\[InvisibleSpace]", UnderscriptBox["\<\"lim \"\>", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"","\[Infinity]"}, "RowDefault"]}]], "\[InvisibleSpace]", TagBox[ FractionBox[ RowBox[{ RowBox[{"-", "3"}], " ", "x"}], RowBox[{"2", " ", "x"}]], DisplayForm]}], SequenceForm[" = ", Underscript["lim ", $CellContext`x -> Row[{"+", DirectedInfinity[1]}]], DisplayForm[ FractionBox[(-3) $CellContext`x, 2 $CellContext`x]]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.744537569786852*^9},ExpressionUUID-> "199302a5-fff0-4ca0-b118-3103ca6f5711"], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\" = \"\>", "\[InvisibleSpace]", RowBox[{"-", FractionBox["3", "2"]}]}], SequenceForm[" = ", Rational[-3, 2]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.7445375697910147`*^9},ExpressionUUID-> "5759c905-c75d-40ee-bceb-8d3995880e67"], "\n", Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\"AO\"\>", "\[InvisibleSpace]", "\<\" \[Congruent] \"\>", "\[InvisibleSpace]", FormBox[ RowBox[{"y", "\[LongEqual]", RowBox[{"x", "-", FractionBox["3", "2"]}]}], TraditionalForm], "\[InvisibleSpace]", "\<\" \[AGrave] droite\"\>"}], SequenceForm["AO", " \[Congruent] ", math`Droite[$CellContext`y == Rational[-3, 2] + $CellContext`x], " \[AGrave] droite"], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.744537691163159*^9},ExpressionUUID-> "94cfc04a-4acd-4786-811a-63c11585cad8"], "\n\n", Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ StyleBox["\<\"a = \"\>", StripOnInput->False, FontSlant->Italic], "\[InvisibleSpace]", UnderscriptBox["\<\"lim \"\>", RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]], "\[InvisibleSpace]", TagBox[ FractionBox[ RowBox[{"f", RowBox[{"(", "x", ")"}]}], "x"], DisplayForm], "\[InvisibleSpace]", "\<\" = \"\>"}], SequenceForm[ Style["a = ", Italic], Underscript["lim ", $CellContext`x -> DirectedInfinity[-1]], DisplayForm[ FractionBox["f(x)", "x"]], " = "], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.744537569794984*^9},ExpressionUUID-> "39e899c1-9366-4337-ad23-7ddc1fba7e59"], "\n", Cell[BoxData[ FormBox[ TemplateBox[{UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]],"\" \"",FractionBox[ SqrtBox[ RowBox[{ SuperscriptBox["x", "2"], "-", RowBox[{"3", " ", "x"}], "+", "2"}]], "x"],"\" = \"",UnderscriptBox[ "\"lim \"", RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]],TagBox[ FractionBox[ SqrtBox[ SuperscriptBox["x", "2"]], "x"], DisplayForm],"\" = \"", UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]],TagBox[ FractionBox[ RowBox[{"-", "x"}], "x"], DisplayForm],"\" = \"",UnderscriptBox[ "\"lim \"", RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]],RowBox[{"-", "1"}],"\" =\"", RowBox[{"-", "1"}]}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{3.744537569802485*^9},ExpressionUUID-> "f485814a-1e91-496f-8dfe-6fe17cbe0fad"], "\n", Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ StyleBox["\<\"b = \"\>", StripOnInput->False, FontSlant->Italic], "\[InvisibleSpace]", UnderscriptBox["\<\"lim \"\>", RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]], "\[InvisibleSpace]", StyleBox["\<\"f(x) - a x = \"\>", StripOnInput->False, FontSlant->Italic]}], SequenceForm[ Style["b = ", Italic], Underscript["lim ", $CellContext`x -> DirectedInfinity[-1]], Style["f(x) - a x = ", Italic]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.744537569807582*^9},ExpressionUUID-> "472273f2-a03a-454b-981b-93aa990fe0e8"], Cell[BoxData[ FormBox[ TemplateBox[{UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]],RowBox[{ SqrtBox[ RowBox[{ SuperscriptBox["x", "2"], "-", RowBox[{"3", " ", "x"}], "+", "2"}]], "+", "x"}]}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{3.7445375698199797`*^9},ExpressionUUID-> "f03c8b6e-1775-4187-834f-2d58e4de0ae9"], "\n", Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ TemplateBox[{UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]],SqrtBox[ RowBox[{ SuperscriptBox["x", "2"], "-", RowBox[{"3", " ", "x"}], "+", "2"}]],"\" + \"","x"}, "RowDefault"], "\[InvisibleSpace]", "\<\" = [+\[Infinity] - \[Infinity]]\"\>"}], SequenceForm[ Row[{ Underscript[ "lim ", $CellContext`x -> DirectedInfinity[-1]], (2 - 3 $CellContext`x + $CellContext`x^2)^Rational[1, 2], " + ", $CellContext`x}], " = [+\[Infinity] - \[Infinity]]"], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.744537569824263*^9},ExpressionUUID-> "c750772e-9b73-49b6-9945-5e96241ba9b3"], "\n", Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\" = \"\>", "\[InvisibleSpace]", UnderscriptBox["\<\"lim \"\>", RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]], "\[InvisibleSpace]", TagBox[ FractionBox[ TemplateBox[{"\"(\"",TemplateBox[{ SqrtBox[ RowBox[{ SuperscriptBox["x", "2"], "-", RowBox[{"3", " ", "x"}], "+", "2"}]], "\" + (\"", "x", "\")\""}, "RowDefault"],"\") (\"",TemplateBox[{ SqrtBox[ RowBox[{ SuperscriptBox["x", "2"], "-", RowBox[{"3", " ", "x"}], "+", "2"}]], "\" - (\"", "x", "\")\""}, "RowDefault"],"\")\""}, "RowDefault"], TemplateBox[{SqrtBox[ RowBox[{ SuperscriptBox["x", "2"], "-", RowBox[{"3", " ", "x"}], "+", "2"}]],"\" - (\"","x","\")\""}, "RowDefault"]], DisplayForm]}], SequenceForm[" = ", Underscript["lim ", $CellContext`x -> DirectedInfinity[-1]], DisplayForm[ FractionBox[ Row[{"(", Row[{(2 - 3 $CellContext`x + $CellContext`x^2)^Rational[1, 2], " + (", $CellContext`x, ")"}], ") (", Row[{(2 - 3 $CellContext`x + $CellContext`x^2)^Rational[1, 2], " - (", $CellContext`x, ")"}], ")"}], Row[{(2 - 3 $CellContext`x + $CellContext`x^2)^Rational[1, 2], " - (", $CellContext`x, ")"}]]]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.744537569828334*^9},ExpressionUUID-> "33e23c0d-bc08-4f86-9ed7-6021494adf92"], "\n", Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\" = \"\>", "\[InvisibleSpace]", UnderscriptBox["\<\"lim \"\>", RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]], "\[InvisibleSpace]", TagBox[ FractionBox[ TemplateBox[{"\"(\"",RowBox[{ SuperscriptBox["x", "2"], "-", RowBox[{"3", " ", "x"}], "+", "2"}],"\") - (\"",SuperscriptBox[ "x", "2"],"\")\""}, "RowDefault"], TemplateBox[{SqrtBox[ RowBox[{ SuperscriptBox["x", "2"], "-", RowBox[{"3", " ", "x"}], "+", "2"}]],"\" - (\"","x","\")\""}, "RowDefault"]], DisplayForm]}], SequenceForm[" = ", Underscript["lim ", $CellContext`x -> DirectedInfinity[-1]], DisplayForm[ FractionBox[ Row[{ "(", 2 - 3 $CellContext`x + $CellContext`x^2, ") - (", $CellContext`x^2, ")"}], Row[{(2 - 3 $CellContext`x + $CellContext`x^2)^Rational[1, 2], " - (", $CellContext`x, ")"}]]]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.7445375698358793`*^9},ExpressionUUID-> "32c7f3c2-ab95-497a-a85e-ffe3e1765e37"], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\" = \"\>", "\[InvisibleSpace]", UnderscriptBox["\<\"lim \"\>", RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]], "\[InvisibleSpace]", TagBox[ FractionBox[ RowBox[{"2", "-", RowBox[{"3", " ", "x"}]}], TemplateBox[{SqrtBox[ RowBox[{ SuperscriptBox["x", "2"], "-", RowBox[{"3", " ", "x"}], "+", "2"}]],"\" - (\"","x","\")\""}, "RowDefault"]], DisplayForm]}], SequenceForm[" = ", Underscript["lim ", $CellContext`x -> DirectedInfinity[-1]], DisplayForm[ FractionBox[2 - 3 $CellContext`x, Row[{(2 - 3 $CellContext`x + $CellContext`x^2)^Rational[1, 2], " - (", $CellContext`x, ")"}]]]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.7445375698404617`*^9},ExpressionUUID-> "0fd8aab1-2ac3-4463-adcc-fc5180aeb6eb"], "\n", Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\" = \"\>", "\[InvisibleSpace]", UnderscriptBox["\<\"lim \"\>", RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]], "\[InvisibleSpace]", TagBox[ FractionBox[ RowBox[{ RowBox[{"-", "3"}], " ", "x"}], RowBox[{ SqrtBox[ SuperscriptBox["x", "2"]], "-", "x"}]], DisplayForm]}], SequenceForm[" = ", Underscript["lim ", $CellContext`x -> DirectedInfinity[-1]], DisplayForm[ FractionBox[(-3) $CellContext`x, -$CellContext`x + ($CellContext`x^2)^ Rational[1, 2]]]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.744537569844442*^9},ExpressionUUID-> "dd17ca7d-c71f-4717-84a6-5b9115c8f4d9"], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\" = \"\>", "\[InvisibleSpace]", UnderscriptBox["\<\"lim \"\>", RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]], "\[InvisibleSpace]", "\<\" \"\>", "\[InvisibleSpace]", TagBox[ FractionBox[ RowBox[{ RowBox[{"-", "3"}], " ", "x"}], RowBox[{ RowBox[{"-", "2"}], " ", "x"}]], DisplayForm]}], SequenceForm[" = ", Underscript["lim ", $CellContext`x -> DirectedInfinity[-1]], " ", DisplayForm[ FractionBox[(-3) $CellContext`x, (-2) $CellContext`x]]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.7445375698479557`*^9},ExpressionUUID-> "edd78040-7705-44a8-b0eb-8ade0863df5f"], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\" = \"\>", "\[InvisibleSpace]", FractionBox["3", "2"]}], SequenceForm[" = ", Rational[3, 2]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.7445375698512363`*^9},ExpressionUUID-> "7743eb0b-d7c6-44d2-be43-8882e92af16a"], "\n", Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\"AO\"\>", "\[InvisibleSpace]", "\<\" \[Congruent] \"\>", "\[InvisibleSpace]", FormBox[ RowBox[{"y", "\[LongEqual]", RowBox[{ FractionBox["3", "2"], "-", "x"}]}], TraditionalForm], "\[InvisibleSpace]", "\<\" \[AGrave] gauche\"\>"}], SequenceForm["AO", " \[Congruent] ", math`Droite[$CellContext`y == Rational[3, 2] - $CellContext`x], " \[AGrave] gauche"], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.744537691169917*^9},ExpressionUUID-> "84af752f-ee20-4149-80a5-9fa22c69f4ce"] }], "Titre2", CellChangeTimes->{ 3.641727865504284*^9, {3.744537606068293*^9, 3.744537660894116*^9}, { 3.744537703252212*^9, 3.744537709944784*^9}},ExpressionUUID->"e6e5154b-6b95-4909-8f25-\ 469ab35286d5"], Cell[TextData[{ "2) ", Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ StyleBox["\<\"f(x) = \"\>", StripOnInput->False, FontSlant->Italic], "\[InvisibleSpace]", FractionBox[ SqrtBox[ RowBox[{ SuperscriptBox["x", "2"], "-", "1"}]], RowBox[{"3", "-", "x"}]]}], SequenceForm[ Style[ "f(x) = ", Italic], (3 - $CellContext`x)^(-1) (-1 + $CellContext`x^2)^ Rational[1, 2]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.744537568656942*^9, 3.74453773767432*^9}, ExpressionUUID->"7223ffb7-7b5c-4aaa-9aa6-4be14d8000eb"], "\n", Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\"Dom f = \"\>", "\[InvisibleSpace]", FormBox[ InterpretationBox["\<\"\\!\\(\\*FormBox[FormBox[\\\"\\\\\\\"\ \[LongLeftArrow]; \ \\\\\\\\!\\\\\\\\(\\\\\\\\*FormBox[RowBox[{\\\\\\\\\\\\\\\"-\\\\\\\\\\\\\\\", \ \\\\\\\\\\\\\\\"1\\\\\\\\\\\\\\\"}], TraditionalForm]\\\\\\\\)]\\\\\\\"\\\", \ TraditionalForm], TraditionalForm]\\) \[Union] \ \\!\\(\\*FormBox[FormBox[\\\"\\\\\\\"\\\\\\\\!\\\\\\\\(\\\\\\\\*FormBox[\ FormBox[\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"[\\\\\\\\\\\\\\\\\\\\\ \\\\\\\\\\\\!\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ *FormBox[\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"1\\\\\ \\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\", \ TraditionalForm]\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\); \\\\\\\\\\\\\\\\\\\\\\\\\\\ \\\\\\!\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\(\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\*\ FormBox[\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"3\\\\\ \\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\", \ TraditionalForm]\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\)[\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ \\\"\\\\\\\\\\\\\\\", TraditionalForm], TraditionalForm]\\\\\\\\) \[Union] \\\ \\\\\\!\\\\\\\\(\\\\\\\\*FormBox[FormBox[\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\\\\\\\ \\\\\\\\\\\"]\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\!\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ (\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\*FormBox[\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ \\\\\\\\\\\\\\\\\\\\\\\\\\\"3\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\ \\\\\\\\\\\\\\\", TraditionalForm]\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\); \ \[LongRightArrow]\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\\"\\\\\\\\\\\\\\\", \ TraditionalForm], TraditionalForm]\\\\\\\\)\\\\\\\"\\\", TraditionalForm], \ TraditionalForm]\\)\"\>", StringForm["`1` \[Union] `2`", math`Ens[$CellContext`x <= -1, $CellContext`x], math`Ens[ Or[ Inequality[1, LessEqual, $CellContext`x, Less, 3], $CellContext`x > 3], $CellContext`x]], Editable->False], TraditionalForm]}], SequenceForm["Dom f = ", math`Ens[ Or[$CellContext`x <= -1, Inequality[1, LessEqual, $CellContext`x, Less, 3], $CellContext`x > 3], $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.744537568656942*^9, 3.744537737682374*^9}, ExpressionUUID->"ac43b5ee-6a76-4ce3-8001-ef8f6327d9af"], "\n", Cell[BoxData[ FormBox[ TemplateBox[{FormBox[ TemplateBox[{ UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", RowBox[{"-", "1"}]}]], FractionBox[ SqrtBox[ RowBox[{ SuperscriptBox["x", "2"], "-", "1"}]], RowBox[{"3", "-", "x"}]]}, "RowDefault"], TraditionalForm],"\" = \"", "0"}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{3.744537568656942*^9, 3.744537737802795*^9}, ExpressionUUID->"4c544ccc-b8f2-4472-a396-a9ad0ae6bb4c"], "\n", Cell[BoxData[ FormBox[ TemplateBox[{FormBox[ TemplateBox[{ UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", "1"}]], FractionBox[ SqrtBox[ RowBox[{ SuperscriptBox["x", "2"], "-", "1"}]], RowBox[{"3", "-", "x"}]]}, "RowDefault"], TraditionalForm],"\" = \"", "0"}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{3.744537568656942*^9, 3.744537738140201*^9}, ExpressionUUID->"89308992-fc79-47ac-96d2-8885d1b122ce"], "\n", Cell[BoxData[ FormBox[ TemplateBox[{UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", "3"}]],FractionBox[ SqrtBox[ RowBox[{ SuperscriptBox["x", "2"], "-", "1"}]], RowBox[{"3", "-", "x"}]],"\" = [\"",TagBox[ FractionBox[ RowBox[{"2", " ", SqrtBox["2"]}], "0"], DisplayForm],"\"]\""}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{3.744537568656942*^9, 3.744537738360877*^9}, ExpressionUUID->"a4ee1f3e-07f3-493d-b7eb-4fef2c658c96"], "\n", Cell[BoxData[ FormBox[ TagBox[GridBox[{ {"\[Piecewise]", GridBox[{ { TemplateBox[{FormBox[ TemplateBox[{ UnderscriptBox["\"lim\"", UnderscriptBox[ RowBox[{"x", "\[Rule]", "3"}], "\"<\""]], "\" \"", FractionBox[ SqrtBox[ RowBox[{ SuperscriptBox["x", "2"], "-", "1"}]], RowBox[{"3", "-", "x"}]]}, "RowDefault"], TraditionalForm], "\" = \"",TemplateBox[{"\"+\"", "\[Infinity]"}, "RowDefault"]}, "RowDefault"], "\<\" \"\>"}, { TemplateBox[{FormBox[ TemplateBox[{ UnderscriptBox["\"lim\"", UnderscriptBox[ RowBox[{"x", "\[Rule]", "3"}], "\">\""]], "\" \"", FractionBox[ SqrtBox[ RowBox[{ SuperscriptBox["x", "2"], "-", "1"}]], RowBox[{"3", "-", "x"}]]}, "RowDefault"], TraditionalForm], "\" = \"",RowBox[{"-", "\[Infinity]"}]}, "RowDefault"], "\<\" \"\>"} }, AllowedDimensions->{2, Automatic}, Editable->True, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.84]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}, Selectable->True]} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.35]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "Piecewise", DeleteWithContents->True, Editable->False, SelectWithContents->True, Selectable->False], TraditionalForm]], "Print", CellChangeTimes->{3.744537568656942*^9, 3.744537738420333*^9}, ExpressionUUID->"076b1750-84fd-411b-8f3f-a0fd8aa4b3ac"], "\n", Cell[BoxData[ FormBox[ TemplateBox[{"\"AV \[Congruent] \"","x","\" = \"","3"}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{3.744537690562817*^9, 3.7445377393400793`*^9}, ExpressionUUID->"51cd5558-8830-4326-8f9b-6186daed6d61"], "\n\n", Cell[BoxData[ FormBox[ TemplateBox[{UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"", "\[Infinity]"}, "RowDefault"]}]],"\" \"", FractionBox[ SqrtBox[ RowBox[{ SuperscriptBox["x", "2"], "-", "1"}]], RowBox[{"3", "-", "x"}]],"\" = \"",UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"", "\[Infinity]"}, "RowDefault"]}]],TagBox[ FractionBox[ SqrtBox[ SuperscriptBox["x", "2"]], RowBox[{"-", "x"}]], DisplayForm],"\" = \"",UnderscriptBox[ "\"lim \"", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"", "\[Infinity]"}, "RowDefault"]}]],TagBox[ FractionBox["x", RowBox[{"-", "x"}]], DisplayForm],"\" = \"",UnderscriptBox[ "\"lim \"", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"", "\[Infinity]"}, "RowDefault"]}]], RowBox[{"-", "1"}],"\" =\"",RowBox[{"-", "1"}]}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{3.744537568656942*^9, 3.7445377386536083`*^9}, ExpressionUUID->"40261778-bb1a-4177-a6f9-6a03aaea9770"], "\n", Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\"AH\"\>", "\[InvisibleSpace]", "\<\" \[Congruent] \"\>", "\[InvisibleSpace]", FormBox[ RowBox[{"y", "\[LongEqual]", RowBox[{"-", "1"}]}], TraditionalForm], "\[InvisibleSpace]", "\<\" \[AGrave] droite\"\>"}], SequenceForm["AH", " \[Congruent] ", math`Droite[$CellContext`y == -1], " \[AGrave] droite"], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.744537690562817*^9, 3.7445377394264297`*^9}, ExpressionUUID->"79654e63-7e0e-4c54-9e1f-c464f355b044"], "\n\n", Cell[BoxData[ FormBox[ TemplateBox[{UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]],"\" \"",FractionBox[ SqrtBox[ RowBox[{ SuperscriptBox["x", "2"], "-", "1"}]], RowBox[{"3", "-", "x"}]],"\" = \"",UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]],TagBox[ FractionBox[ SqrtBox[ SuperscriptBox["x", "2"]], RowBox[{"-", "x"}]], DisplayForm],"\" = \"",UnderscriptBox[ "\"lim \"", RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]],TagBox[ FractionBox[ RowBox[{"-", "x"}], RowBox[{"-", "x"}]], DisplayForm],"\" = \"",UnderscriptBox[ "\"lim \"", RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]],"1","\" =\"","1"}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{3.744537568656942*^9, 3.7445377386742*^9},ExpressionUUID-> "4a8ebf43-b37f-46e7-84b0-496d1da33d29"], "\n", Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\"AH\"\>", "\[InvisibleSpace]", "\<\" \[Congruent] \"\>", "\[InvisibleSpace]", FormBox[ RowBox[{"y", "\[LongEqual]", "1"}], TraditionalForm], "\[InvisibleSpace]", "\<\" \[AGrave] gauche\"\>"}], SequenceForm["AH", " \[Congruent] ", math`Droite[$CellContext`y == 1], " \[AGrave] gauche"], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.744537690562817*^9, 3.744537739442333*^9}, ExpressionUUID->"2021f37a-f7cd-4f05-8887-56626468e63e"] }], "Titre2", CellChangeTimes->{ 3.641727865504284*^9, {3.74453774879808*^9, 3.7445378097677107`*^9}},ExpressionUUID->"767a2a2c-60c2-426c-b05d-\ 82d7c1c6a429"], Cell[TextData[{ "3) ", Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ StyleBox["\<\"f(x) = \"\>", StripOnInput->False, FontSlant->Italic], "\[InvisibleSpace]", RowBox[{ SqrtBox[ RowBox[{"x", "-", "1"}]], "-", SqrtBox["x"]}]}], SequenceForm[ Style[ "f(x) = ", Italic], (-1 + $CellContext`x)^ Rational[1, 2] - $CellContext`x^Rational[1, 2]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}},ExpressionUUID-> "7d93f122-7ab1-4453-ab4f-c7eee9f722e4"], "\n\n", Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\"Dom f = \"\>", "\[InvisibleSpace]", FormBox[ InterpretationBox["\<\"[\\!\\(\\*FormBox[\\\"1\\\", \ TraditionalForm]\\); \[LongRightArrow]\"\>", StringForm["[`1`; \[LongRightArrow]", 1], Editable->False], TraditionalForm]}], SequenceForm["Dom f = ", math`Ens[$CellContext`x >= 1, $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015968573*^9}},ExpressionUUID-> "7216545c-e0f2-4283-b3bf-1ee2dad65f0d"], "\n\n", Cell[BoxData[ FormBox[ TemplateBox[{FormBox[ TemplateBox[{ UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", "1"}]], RowBox[{ SqrtBox[ RowBox[{"x", "-", "1"}]], "-", SqrtBox["x"]}]}, "RowDefault"], TraditionalForm],"\" = \"", RowBox[{"-", "1"}]}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538016041747*^9}},ExpressionUUID-> "f81665b5-4535-4776-8e0a-f322255dca47"], "\n\n", Cell[BoxData[ FormBox[ TemplateBox[{FormBox[ TemplateBox[{ UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"", "\[Infinity]"}, "RowDefault"]}]], RowBox[{ SqrtBox[ RowBox[{"x", "-", "1"}]], "-", SqrtBox["x"]}]}, "RowDefault"], TraditionalForm],"\" = [(\"", "\[Infinity]","\")-(\"","\[Infinity]","\")]\""}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.7445380161872797`*^9}},ExpressionUUID-> "df4ae9a0-fe06-468a-8f56-2c44d6639080"], "\n", Cell[BoxData[ FormBox[ TemplateBox[{"\" = \"",UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"", "\[Infinity]"}, "RowDefault"]}]],"\" \"",TagBox[ FractionBox[ RowBox[{ RowBox[{"(", RowBox[{ SqrtBox[ RowBox[{"x", "-", "1"}]], "-", SqrtBox["x"]}], ")"}], " ", RowBox[{"(", RowBox[{ SqrtBox[ RowBox[{"x", "-", "1"}]], "+", SqrtBox["x"]}], ")"}]}], RowBox[{ SqrtBox[ RowBox[{"x", "-", "1"}]], "+", SqrtBox["x"]}]], DisplayForm]}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.7445380161981983`*^9}},ExpressionUUID-> "dbfca0da-93dd-4a59-b127-5540c8faf05f"], "\n", Cell[BoxData[ FormBox[ TemplateBox[{"\" = \"",UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"", "\[Infinity]"}, "RowDefault"]}]],"\" \"",TagBox[ FractionBox[ RowBox[{ SuperscriptBox[ RowBox[{"(", RowBox[{"x", "-", "1"}], ")"}], "2"], "-", SuperscriptBox["x", "2"]}], RowBox[{ SqrtBox[ RowBox[{"x", "-", "1"}]], "+", SqrtBox["x"]}]], DisplayForm]}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.7445380162089453`*^9}},ExpressionUUID-> "f95becb0-398c-4607-895d-cec3ce38e9b4"], Cell[BoxData[ FormBox[ TemplateBox[{"\" = \"",UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"", "\[Infinity]"}, "RowDefault"]}]],"\" \"",TagBox[ FractionBox[ RowBox[{"-", "1"}], RowBox[{ SqrtBox[ RowBox[{"x", "-", "1"}]], "+", SqrtBox["x"]}]], DisplayForm]}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.7445380162207336`*^9}},ExpressionUUID-> "0d34152e-728c-4e76-85a0-4b995564cd31"], "\n", Cell[BoxData[ FormBox[ TemplateBox[{"\" = \"",UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"", "\[Infinity]"}, "RowDefault"]}]],"\" \"",TagBox[ FractionBox[ RowBox[{"-", "1"}], RowBox[{"2", " ", SqrtBox["x"]}]], DisplayForm]}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.7445380162308283`*^9}},ExpressionUUID-> "75271be7-589a-4a4b-b5e8-2924bccdb38f"], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\" = \"\>", "\[InvisibleSpace]", "0"}], SequenceForm[" = ", 0], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538016240946*^9}},ExpressionUUID-> "871d39c9-fd70-4672-85b9-bc36435b1a31"], "\n", Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\"AH\"\>", "\[InvisibleSpace]", "\<\" \[Congruent] \"\>", "\[InvisibleSpace]", FormBox[ RowBox[{"y", "\[LongEqual]", "0"}], TraditionalForm], "\[InvisibleSpace]", "\<\" \[AGrave] droite\"\>"}], SequenceForm["AH", " \[Congruent] ", math`Droite[$CellContext`y == 0], " \[AGrave] droite"], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.744537690562817*^9, 3.744537738889546*^9, 3.74453801689384*^9},ExpressionUUID-> "c3fc5b3b-9889-41c1-aa1b-368aa89b0988"], "\n\n", Cell[BoxData[ FormBox[ TemplateBox[{FormBox[ TemplateBox[{ UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]], FractionBox[ RowBox[{ SqrtBox[ RowBox[{"x", "-", "1"}]], "-", SqrtBox["x"]}], "x"]}, "RowDefault"], TraditionalForm],"\" = \"", "\"\[NotExists]\""}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.74453801643852*^9}},ExpressionUUID-> "85381820-9d67-4331-bc53-1f8222ceaa45"], "\t(voir domaine ! )" }], "Titre2", CellChangeTimes->{ 3.641727865504284*^9, {3.744538030870556*^9, 3.744538094260795*^9}},ExpressionUUID->"506a86ab-03f5-4f58-9c02-\ ff3085646f50"], Cell[TextData[{ "4) ", Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ StyleBox["\<\"f(x) = \"\>", StripOnInput->False, FontSlant->Italic], "\[InvisibleSpace]", FractionBox["1", SqrtBox[ RowBox[{"4", "-", SuperscriptBox["x", "2"]}]]]}], SequenceForm[ Style["f(x) = ", Italic], (4 - $CellContext`x^2)^Rational[-1, 2]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9},ExpressionUUID-> "eb1984af-cdd1-4365-8963-00987e5de901"], "\n", Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\"Dom f = \"\>", "\[InvisibleSpace]", FormBox[ InterpretationBox["\<\"]\\!\\(\\*FormBox[RowBox[{\\\"-\\\", \ \\\"2\\\"}], TraditionalForm]\\); \\!\\(\\*FormBox[\\\"2\\\", \ TraditionalForm]\\)[\"\>", StringForm["]`1`; `2`[", -2, 2], Editable->False], TraditionalForm]}], SequenceForm["Dom f = ", math`Ens[ Inequality[-2, Less, $CellContext`x, Less, 2], $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164360396*^9},ExpressionUUID-> "9a301583-7f3b-408c-93ad-46a09ae8271c"], "\n\n", Cell[BoxData[ FormBox[ TemplateBox[{UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", RowBox[{"-", "2"}]}]],FractionBox["1", SqrtBox[ RowBox[{"4", "-", SuperscriptBox["x", "2"]}]]],"\" = [\"",TagBox[ FractionBox["1", "0"], DisplayForm],"\"]\""}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164460339*^9},ExpressionUUID-> "ce7b15d2-6bce-4674-91c7-466bf26c76c5"], "\n", Cell[BoxData[ FormBox[ TemplateBox[{FormBox[ TemplateBox[{ UnderscriptBox["\"lim\"", UnderscriptBox[ RowBox[{"x", "\[Rule]", RowBox[{"-", "2"}]}], "\">\""]], "\" \"", FractionBox["1", SqrtBox[ RowBox[{"4", "-", SuperscriptBox["x", "2"]}]]]}, "RowDefault"], TraditionalForm], "\" = \"",TemplateBox[{"\"+\"", "\[Infinity]"}, "RowDefault"]}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164657977*^9},ExpressionUUID-> "3e167d08-51a6-4f29-ac18-b2552b0f8ea6"], "\n", Cell[BoxData[ FormBox[ TemplateBox[{ "\"AV \[Congruent] \"","x","\" = \"",RowBox[{"-", "2"}], "\" \[AGrave] droite\""}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{3.744537690562817*^9, 3.744537738889546*^9, 3.744538016641222*^9, 3.744538166401291*^9},ExpressionUUID-> "be6b1590-d603-4cc2-acfa-cd2764ad946a"], "\n\n", Cell[BoxData[ FormBox[ TemplateBox[{UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", "2"}]],FractionBox["1", SqrtBox[ RowBox[{"4", "-", SuperscriptBox["x", "2"]}]]],"\" = [\"",TagBox[ FractionBox["1", "0"], DisplayForm],"\"]\""}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.74453816513174*^9},ExpressionUUID-> "538b28c1-4da6-47ca-887d-6b33e43ca170"], "\n", Cell[BoxData[ FormBox[ TemplateBox[{FormBox[ TemplateBox[{ UnderscriptBox["\"lim\"", UnderscriptBox[ RowBox[{"x", "\[Rule]", "2"}], "\"<\""]], "\" \"", FractionBox["1", SqrtBox[ RowBox[{"4", "-", SuperscriptBox["x", "2"]}]]]}, "RowDefault"], TraditionalForm], "\" = \"",TemplateBox[{"\"+\"", "\[Infinity]"}, "RowDefault"]}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538165320532*^9},ExpressionUUID-> "48ec0cd2-eda1-4103-974a-325fc1b23b31"], "\n", Cell[BoxData[ FormBox[ TemplateBox[{ "\"AV \[Congruent] \"","x","\" = \"","2","\" \[AGrave] gauche\""}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{3.744537690562817*^9, 3.744537738889546*^9, 3.744538016641222*^9, 3.744538166854898*^9},ExpressionUUID-> "f3ad0d68-dad1-42de-94b7-4e5660c07478"], "\n", Cell[BoxData[ FormBox[ TemplateBox[{FormBox[ TemplateBox[{ UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"", "\[Infinity]"}, "RowDefault"]}]], FractionBox["1", SqrtBox[ RowBox[{"4", "-", SuperscriptBox["x", "2"]}]]]}, "RowDefault"], TraditionalForm], "\" = \"","\"\[NotExists]\""}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538165694929*^9},ExpressionUUID-> "5a3e7a7c-61e1-47f4-a6e9-f499e3642989"] }], "Titre2", CellChangeTimes->{ 3.641727865504284*^9, {3.744538153881748*^9, 3.7445382313268127`*^9}},ExpressionUUID->"3b6c331c-1fdc-4cc3-8801-\ 651f2d4ba4b6"], Cell[TextData[{ "5) ", Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ StyleBox["\<\"f(x) = \"\>", StripOnInput->False, FontSlant->Italic], "\[InvisibleSpace]", SqrtBox[ FractionBox[ RowBox[{"x", "-", "3"}], RowBox[{"x", "-", "4"}]]]}], SequenceForm[ Style[ "f(x) = ", Italic], ((-4 + $CellContext`x)^(-1) (-3 + $CellContext`x))^ Rational[1, 2]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9}, ExpressionUUID->"d2e199d2-694a-4483-a9f6-d9e66e82ebfb"], "\n", Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\"Dom f = \"\>", "\[InvisibleSpace]", FormBox[ InterpretationBox["\<\"\\!\\(\\*FormBox[FormBox[\\\"\\\\\\\"\ \[LongLeftArrow]; \ \\\\\\\\!\\\\\\\\(\\\\\\\\*FormBox[\\\\\\\\\\\\\\\"3\\\\\\\\\\\\\\\", \ TraditionalForm]\\\\\\\\)]\\\\\\\"\\\", TraditionalForm], TraditionalForm]\\) \ \[Union] \\!\\(\\*FormBox[FormBox[\\\"\\\\\\\"]\\\\\\\\!\\\\\\\\(\\\\\\\\*\ FormBox[\\\\\\\\\\\\\\\"4\\\\\\\\\\\\\\\", TraditionalForm]\\\\\\\\); \ \[LongRightArrow]\\\\\\\"\\\", TraditionalForm], TraditionalForm]\\)\"\>", StringForm["`1` \[Union] `2`", math`Ens[$CellContext`x <= 3, $CellContext`x], math`Ens[$CellContext`x > 4, $CellContext`x]], Editable->False], TraditionalForm]}], SequenceForm["Dom f = ", math`Ens[ Or[$CellContext`x <= 3, $CellContext`x > 4], $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.744538249890315*^9}, ExpressionUUID->"a85f440a-f742-4a2a-bd6e-f87035c492ae"], "\n\n", Cell[BoxData[ FormBox[ TemplateBox[{FormBox[ TemplateBox[{ UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", "3"}]], SqrtBox[ FractionBox[ RowBox[{"x", "-", "3"}], RowBox[{"x", "-", "4"}]]]}, "RowDefault"], TraditionalForm], "\" = \"","0"}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382499916143`*^9}, ExpressionUUID->"6c7cb026-ce40-4ff6-bdcd-810393bd3dbb"], "\n\n", Cell[BoxData[ FormBox[ TemplateBox[{FormBox[ TemplateBox[{ UnderscriptBox["\"lim\"", UnderscriptBox[ RowBox[{"x", "\[Rule]", "4"}], "\">\""]], "\" \"", SqrtBox[ FractionBox[ RowBox[{"x", "-", "3"}], RowBox[{"x", "-", "4"}]]]}, "RowDefault"], TraditionalForm], "\" = \"",TemplateBox[{"\"+\"", "\[Infinity]"}, "RowDefault"]}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{3.744537690562817*^9, 3.744537738889546*^9, 3.744538016641222*^9, 3.7445381659711857`*^9, 3.7445382510043507`*^9}, ExpressionUUID->"44b3e6e5-2a8e-4309-9317-4dd5a998d49f"], "\n", Cell[BoxData[ FormBox[ TemplateBox[{ "\"AV \[Congruent] \"","x","\" = \"","4","\" \[AGrave] droite\""}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{3.744537690562817*^9, 3.744537738889546*^9, 3.744538016641222*^9, 3.7445381659711857`*^9, 3.744538251094923*^9}, ExpressionUUID->"e0a970f0-6f93-4dd4-9fef-8e8f35333fc4"], "\n\n", Cell[BoxData[ FormBox[ TemplateBox[{UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]],SqrtBox[ FractionBox[ RowBox[{"x", "-", "3"}], RowBox[{"x", "-", "4"}]]],"\" = \"",UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]],SqrtBox[ FractionBox[ RowBox[{"x", "-", "3"}], RowBox[{"x", "-", "4"}]]],"\" = \"","1"}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382504831743`*^9}, ExpressionUUID->"1a29ed8b-e50e-494c-976c-a8ebe46ce217"], "\n", Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\"AH\"\>", "\[InvisibleSpace]", "\<\" \[Congruent] \"\>", "\[InvisibleSpace]", RowBox[{"y", "\[LongEqual]", "1"}]}], SequenceForm["AH", " \[Congruent] ", $CellContext`y == 1], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.744537690562817*^9, 3.744537738889546*^9, 3.744538016641222*^9, 3.7445381659711857`*^9, 3.744538251161948*^9}, ExpressionUUID->"c6fa618f-990d-46b8-9fdb-bea438269153"] }], "Titre2", CellChangeTimes->{ 3.641727865504284*^9, {3.744538236822674*^9, 3.7445383495311747`*^9}},ExpressionUUID->"a93bca99-ef63-4414-971f-\ da1184f4665e"], Cell[TextData[{ "6) ", Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ StyleBox["\<\"f(x) = \"\>", StripOnInput->False, FontSlant->Italic], "\[InvisibleSpace]", FractionBox[ RowBox[{ SqrtBox[ RowBox[{"x", "+", "7"}]], "-", "3"}], RowBox[{"x", "-", "2"}]]}], SequenceForm[ Style[ "f(x) = ", Italic], (-2 + $CellContext`x)^(-1) (-3 + (7 + $CellContext`x)^ Rational[1, 2])], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9, 3.74453836461134*^9},ExpressionUUID-> "4051590c-669e-4fd8-bbb0-cb485b72e14a"], "\n", Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\"Dom f = \"\>", "\[InvisibleSpace]", FormBox[ InterpretationBox["\<\"\\!\\(\\*FormBox[FormBox[\\\"\\\\\\\"[\\\\\\\\!\\\ \\\\\\(\\\\\\\\*FormBox[RowBox[{\\\\\\\\\\\\\\\"-\\\\\\\\\\\\\\\", \\\\\\\\\\\ \\\\\"7\\\\\\\\\\\\\\\"}], TraditionalForm]\\\\\\\\); \ \\\\\\\\!\\\\\\\\(\\\\\\\\*FormBox[\\\\\\\\\\\\\\\"2\\\\\\\\\\\\\\\", \ TraditionalForm]\\\\\\\\)[\\\\\\\"\\\", TraditionalForm], TraditionalForm]\\) \ \[Union] \\!\\(\\*FormBox[FormBox[\\\"\\\\\\\"]\\\\\\\\!\\\\\\\\(\\\\\\\\*\ FormBox[\\\\\\\\\\\\\\\"2\\\\\\\\\\\\\\\", TraditionalForm]\\\\\\\\); \ \[LongRightArrow]\\\\\\\"\\\", TraditionalForm], TraditionalForm]\\)\"\>", StringForm["`1` \[Union] `2`", math`Ens[ Inequality[-7, LessEqual, $CellContext`x, Less, 2], $CellContext`x], math`Ens[$CellContext`x > 2, $CellContext`x]], Editable->False], TraditionalForm]}], SequenceForm["Dom f = ", math`Ens[ Or[ Inequality[-7, LessEqual, $CellContext`x, Less, 2], $CellContext`x > 2], $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9, 3.7445383646188517`*^9},ExpressionUUID-> "2aa02336-f96f-454b-ad2d-4aa8587f98d7"], "\n\n", Cell[BoxData[ FormBox[ TemplateBox[{FormBox[ TemplateBox[{ UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", RowBox[{"-", "7"}]}]], FractionBox[ RowBox[{ SqrtBox[ RowBox[{"x", "+", "7"}]], "-", "3"}], RowBox[{"x", "-", "2"}]]}, "RowDefault"], TraditionalForm],"\" = \"", FractionBox["1", "3"]}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9, 3.7445383647082233`*^9},ExpressionUUID-> "7072ce81-aea7-4a01-9055-2cf0e11221db"], "\n\n\n", Cell[BoxData[ FormBox[ TemplateBox[{UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", "2"}]],"\" \"",FractionBox[ RowBox[{ SqrtBox[ RowBox[{"x", "+", "7"}]], "-", "3"}], RowBox[{"x", "-", "2"}]],"\" = [\"",TagBox[ FractionBox["0", "0"], DisplayForm],"\"]\""}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9, 3.7445383648002*^9},ExpressionUUID-> "7c3533e6-15d1-4522-a877-b6a78263cb9c"], "\n", Cell[BoxData[ FormBox[ TemplateBox[{"\" = \"",UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", "2"}]],"\" \"",TagBox[ FractionBox[ RowBox[{ RowBox[{"(", RowBox[{ SqrtBox[ RowBox[{"x", "+", "7"}]], "-", "3"}], ")"}], " ", RowBox[{"(", RowBox[{ SqrtBox[ RowBox[{"x", "+", "7"}]], "+", "3"}], ")"}]}], RowBox[{ RowBox[{"(", RowBox[{"x", "-", "2"}], ")"}], " ", RowBox[{"(", RowBox[{ SqrtBox[ RowBox[{"x", "+", "7"}]], "+", "3"}], ")"}]}]], DisplayForm]}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9, 3.7445383648125353`*^9},ExpressionUUID-> "366e96fa-d538-4344-beab-221dd1ef2949"], "\n", Cell[BoxData[ FormBox[ TemplateBox[{"\" = \"",UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", "2"}]],"\" \"",TagBox[ FractionBox[ RowBox[{"x", "-", "2"}], RowBox[{ RowBox[{"(", RowBox[{"x", "-", "2"}], ")"}], " ", RowBox[{"(", RowBox[{ SqrtBox[ RowBox[{"x", "+", "7"}]], "+", "3"}], ")"}]}]], DisplayForm]}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9, 3.744538364823062*^9},ExpressionUUID-> "8cba817f-dca1-454f-8723-2649267aea90"], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\" = \"\>", "\[InvisibleSpace]", UnderscriptBox["\<\"lim \"\>", RowBox[{"x", "\[Rule]", "2"}]], "\[InvisibleSpace]", "\<\" \"\>", "\[InvisibleSpace]", FractionBox["1", RowBox[{ SqrtBox[ RowBox[{"x", "+", "7"}]], "+", "3"}]]}], SequenceForm[" = ", Underscript["lim ", $CellContext`x -> 2], " ", (3 + (7 + $CellContext`x)^Rational[1, 2])^(-1)], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9, 3.7445383648426723`*^9},ExpressionUUID-> "09775d47-9626-4e3e-b843-5c23c4eb9ef5"], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\" = \"\>", "\[InvisibleSpace]", FractionBox["1", "6"]}], SequenceForm[" = ", Rational[1, 6]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9, 3.744538364854041*^9},ExpressionUUID-> "b5bb2e85-994b-4c9d-b83c-f1e15efdfa4d"], "\n\n", Cell[BoxData[ FormBox[ TemplateBox[{UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"", "\[Infinity]"}, "RowDefault"]}]],FractionBox[ RowBox[{ SqrtBox[ RowBox[{"x", "+", "7"}]], "-", "3"}], RowBox[{"x", "-", "2"}]],"\" = \"",UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"", "\[Infinity]"}, "RowDefault"]}]],TagBox[ FractionBox[ SqrtBox["x"], "x"], DisplayForm],"\" = \"",UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"", "\[Infinity]"}, "RowDefault"]}]],"\" \"", FractionBox["1", SqrtBox["x"]],"\" = \"","0"}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9, 3.744538364945232*^9},ExpressionUUID-> "baf2b7bf-e62b-411c-a277-a8f9320cb024"], "\n", Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\"AH\"\>", "\[InvisibleSpace]", "\<\" \[Congruent] \"\>", "\[InvisibleSpace]", FormBox[ RowBox[{"y", "\[LongEqual]", "0"}], TraditionalForm], "\[InvisibleSpace]", "\<\" \[AGrave] droite\"\>"}], SequenceForm["AH", " \[Congruent] ", math`Droite[$CellContext`y == 0], " \[AGrave] droite"], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.744537690562817*^9, 3.744537738889546*^9, 3.744538016641222*^9, 3.7445381659711857`*^9, 3.744538250724907*^9, 3.744538365466168*^9},ExpressionUUID-> "43533140-9064-4833-92f8-d97aaf734559"], "\n\n", Cell[BoxData[ FormBox[ TemplateBox[{FormBox[ TemplateBox[{ UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]], FractionBox[ RowBox[{ SqrtBox[ RowBox[{"x", "+", "7"}]], "-", "3"}], RowBox[{"x", "-", "2"}]]}, "RowDefault"], TraditionalForm],"\" = \"", "\"\[NotExists]\""}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9, 3.744538364965343*^9},ExpressionUUID-> "d9c695c5-7fd7-4b6f-a246-f4a44b8ad054"] }], "Titre2", CellChangeTimes->{ 3.641727865504284*^9, {3.7445383534828568`*^9, 3.744538424137389*^9}},ExpressionUUID->"cc4d3ff9-b5ec-4d1f-b7c7-\ 49af579d5947"], Cell[TextData[{ "7) ", Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ StyleBox["\<\"f(x) = \"\>", StripOnInput->False, FontSlant->Italic], "\[InvisibleSpace]", RowBox[{"x", "+", SqrtBox[ RowBox[{"x", "+", "5"}]]}]}], SequenceForm[ Style[ "f(x) = ", Italic], $CellContext`x + (5 + $CellContext`x)^Rational[1, 2]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9, 3.74453836461134*^9, {3.744538445101452*^9, 3.744538446307172*^9}}, ExpressionUUID->"6c26e50c-b046-4fc0-8354-2b184c8b2ec3"], "\n", Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\"Dom f = \"\>", "\[InvisibleSpace]", FormBox[ InterpretationBox["\<\"[\\!\\(\\*FormBox[RowBox[{\\\"-\\\", \ \\\"5\\\"}], TraditionalForm]\\); \[LongRightArrow]\"\>", StringForm["[`1`; \[LongRightArrow]", -5], Editable->False], TraditionalForm]}], SequenceForm["Dom f = ", math`Ens[$CellContext`x >= -5, $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9, 3.74453836461134*^9, {3.744538445101452*^9, 3.744538446314098*^9}}, ExpressionUUID->"3da789d8-a584-423f-982e-91c96cbeb345"], "\n\n", Cell[BoxData[ FormBox[ TemplateBox[{FormBox[ TemplateBox[{ UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", RowBox[{"-", "5"}]}]], RowBox[{"x", "+", SqrtBox[ RowBox[{"x", "+", "5"}]]}]}, "RowDefault"], TraditionalForm], "\" = \"",RowBox[{"-", "5"}]}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9, 3.74453836461134*^9, {3.744538445101452*^9, 3.7445384463268843`*^9}}, ExpressionUUID->"cb582d3c-5417-45cc-bbb4-8c3a082e13ab"], "\n\n", Cell[BoxData[ FormBox[ TemplateBox[{FormBox[ TemplateBox[{ UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"", "\[Infinity]"}, "RowDefault"]}]], RowBox[{"x", "+", SqrtBox[ RowBox[{"x", "+", "5"}]]}]}, "RowDefault"], TraditionalForm], "\" = \"",FormBox[ TemplateBox[{ UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"", "\[Infinity]"}, "RowDefault"]}]], "x"}, "RowDefault"], TraditionalForm],"\" = \"",InterpretationBox[ "\"+\\!\\(\\*FormBox[\\\"\[Infinity]\\\", TraditionalForm]\\)\"", StringForm["+`1`", DirectedInfinity[1]], Editable -> False]}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9, 3.74453836461134*^9, {3.744538445101452*^9, 3.7445384464084673`*^9}}, ExpressionUUID->"6b528a71-6e54-4124-a089-91473079d7fa"], "\npas d\[CloseCurlyQuote]AH\nAO ?\n", Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ StyleBox["\<\"a = \"\>", StripOnInput->False, FontSlant->Italic], "\[InvisibleSpace]", UnderscriptBox["\<\"lim \"\>", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"","\[Infinity]"}, "RowDefault"]}]], "\[InvisibleSpace]", TagBox[ FractionBox[ RowBox[{"f", RowBox[{"(", "x", ")"}]}], "x"], DisplayForm], "\[InvisibleSpace]", "\<\" = \"\>"}], SequenceForm[ Style["a = ", Italic], Underscript["lim ", $CellContext`x -> Row[{"+", DirectedInfinity[1]}]], DisplayForm[ FractionBox["f(x)", "x"]], " = "], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9, 3.74453836461134*^9, {3.744538445101452*^9, 3.744538446460252*^9}}, ExpressionUUID->"d19ca02a-4b1b-4d9e-b343-42a3a08aba7b"], "\n", Cell[BoxData[ FormBox[ TemplateBox[{UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"", "\[Infinity]"}, "RowDefault"]}]],FractionBox[ RowBox[{"x", "+", SqrtBox[ RowBox[{"x", "+", "5"}]]}], "x"],"\" = \"",UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"", "\[Infinity]"}, "RowDefault"]}]],TagBox[ FractionBox["x", "x"], DisplayForm],"\" = \"",UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"", "\[Infinity]"}, "RowDefault"]}]],"\" \"","1", "\" = \"","1"}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9, 3.74453836461134*^9, {3.744538445101452*^9, 3.744538446480885*^9}}, ExpressionUUID->"6e9b7830-5843-4cff-afd8-c5c915535a98"], "\n\n", Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ StyleBox["\<\"b = \"\>", StripOnInput->False, FontSlant->Italic], "\[InvisibleSpace]", UnderscriptBox["\<\"lim \"\>", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"","\[Infinity]"}, "RowDefault"]}]], "\[InvisibleSpace]", StyleBox["\<\"f(x) - a x = \"\>", StripOnInput->False, FontSlant->Italic]}], SequenceForm[ Style["b = ", Italic], Underscript["lim ", $CellContext`x -> Row[{"+", DirectedInfinity[1]}]], Style["f(x) - a x = ", Italic]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9, 3.74453836461134*^9, {3.744538445101452*^9, 3.7445384464899063`*^9}}, ExpressionUUID->"f16bd0cb-7712-4c0b-aa1d-19ac0ef842cd"], "\n", Cell[BoxData[ FormBox[ TemplateBox[{UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"", "\[Infinity]"}, "RowDefault"]}]],SqrtBox[ RowBox[{"x", "+", "5"}]],"\" = \"",UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"", "\[Infinity]"}, "RowDefault"]}]],SqrtBox["x"], "\" = \"",InterpretationBox[ "\"+\\!\\(\\*FormBox[\\\"\[Infinity]\\\", TraditionalForm]\\)\"", StringForm["+`1`", DirectedInfinity[1]], Editable -> False]}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9, 3.74453836461134*^9, {3.744538445101452*^9, 3.744538446507948*^9}}, ExpressionUUID->"2e67b7b8-3720-467a-9caf-f68680b3f273"], "\npas d\[CloseCurlyQuote]AO\n\n", Cell[BoxData[ FormBox[ TemplateBox[{FormBox[ TemplateBox[{ UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]], RowBox[{"x", "+", SqrtBox[ RowBox[{"x", "+", "5"}]]}]}, "RowDefault"], TraditionalForm], "\" = \"","\"\[NotExists]\""}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9, 3.74453836461134*^9, {3.744538445101452*^9, 3.744538446450341*^9}}, ExpressionUUID->"5a9c6108-dc5c-4f2d-a93f-2fb4cfde182c"] }], "Titre2", CellChangeTimes->{ 3.641727865504284*^9, {3.7445384308587017`*^9, 3.744538534782936*^9}},ExpressionUUID->"c07e2124-6949-48b2-b7b0-\ 3317bf2680fb"], Cell[TextData[{ "8) ", Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ StyleBox["\<\"f(x) = \"\>", StripOnInput->False, FontSlant->Italic], "\[InvisibleSpace]", RowBox[{ SqrtBox[ RowBox[{ SuperscriptBox["x", "2"], "+", "1"}]], "-", "x"}]}], SequenceForm[ Style[ "f(x) = ", Italic], -$CellContext`x + (1 + $CellContext`x^2)^ Rational[1, 2]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9, 3.74453836461134*^9, {3.744538445101452*^9, 3.744538446307172*^9}, { 3.744538557490464*^9, 3.744538558553184*^9}},ExpressionUUID-> "0f44779c-454a-4303-b71b-b007311cd37c"], "\n", Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\"Dom f = \"\>", "\[InvisibleSpace]", FormBox[ TemplateBox[{}, "Reals"], TraditionalForm]}], SequenceForm["Dom f = ", math`Ens[True, $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9, 3.74453836461134*^9, {3.744538445101452*^9, 3.744538446307172*^9}, { 3.744538557490464*^9, 3.744538558561873*^9}},ExpressionUUID-> "74e8870e-d2fd-43a8-93ec-a45f4584712d"], "\n\n", Cell[BoxData[ FormBox["\<\"pas d'asymptote verticale\"\>", TraditionalForm]], "Print", CellChangeTimes->{3.744537690562817*^9, 3.744537738889546*^9, 3.744538016641222*^9, 3.7445381659711857`*^9, 3.744538250724907*^9, 3.744538365262484*^9, 3.7445384466818027`*^9, 3.74453855911973*^9}, ExpressionUUID->"371c9849-a855-4192-bd7d-b9ea85d9a60c"], "\n\n", Cell[BoxData[ FormBox[ TemplateBox[{FormBox[ TemplateBox[{ UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"", "\[Infinity]"}, "RowDefault"]}]], RowBox[{ SqrtBox[ RowBox[{ SuperscriptBox["x", "2"], "+", "1"}]], "-", "x"}]}, "RowDefault"], TraditionalForm],"\" = [\"","\[Infinity]","\"+(\"", RowBox[{"-", "\[Infinity]"}],"\")]\""}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9, 3.74453836461134*^9, {3.744538445101452*^9, 3.744538446307172*^9}, { 3.744538557490464*^9, 3.7445385585810328`*^9}},ExpressionUUID-> "98737d15-bbcd-4e14-a5bc-dcb3324bdff8"], "\n", Cell[BoxData[ FormBox[ TemplateBox[{"\" = \"",UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"", "\[Infinity]"}, "RowDefault"]}]],"\" \"",TagBox[ FractionBox[ RowBox[{ RowBox[{"(", RowBox[{ SqrtBox[ RowBox[{ SuperscriptBox["x", "2"], "+", "1"}]], "-", "x"}], ")"}], " ", RowBox[{"(", RowBox[{"x", "+", SqrtBox[ RowBox[{ SuperscriptBox["x", "2"], "+", "1"}]]}], ")"}]}], RowBox[{"x", "+", SqrtBox[ RowBox[{ SuperscriptBox["x", "2"], "+", "1"}]]}]], DisplayForm]}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9, 3.74453836461134*^9, {3.744538445101452*^9, 3.744538446307172*^9}, { 3.744538557490464*^9, 3.744538558588778*^9}},ExpressionUUID-> "2b236c86-3c1f-4bf3-9569-d62b6d694234"], "\n", Cell[BoxData[ FormBox[ TemplateBox[{"\" = \"",UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"", "\[Infinity]"}, "RowDefault"]}]],"\" \"",TagBox[ FractionBox["1", RowBox[{"x", "+", SqrtBox[ RowBox[{ SuperscriptBox["x", "2"], "+", "1"}]]}]], DisplayForm]}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9, 3.74453836461134*^9, {3.744538445101452*^9, 3.744538446307172*^9}, { 3.744538557490464*^9, 3.744538558598432*^9}},ExpressionUUID-> "e3ebcf6b-6dfd-4ac3-aebb-cc0c9c043391"], Cell[BoxData[ FormBox[ TemplateBox[{"\" = \"",UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"", "\[Infinity]"}, "RowDefault"]}]],"\" \"",TagBox[ FractionBox["1", RowBox[{"x", "+", SqrtBox[ SuperscriptBox["x", "2"]]}]], DisplayForm]}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9, 3.74453836461134*^9, {3.744538445101452*^9, 3.744538446307172*^9}, { 3.744538557490464*^9, 3.744538558613258*^9}},ExpressionUUID-> "ba76b210-f88b-4133-85f5-514ef312497b"], "\n", Cell[BoxData[ FormBox[ TemplateBox[{"\" = \"",UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"", "\[Infinity]"}, "RowDefault"]}]],"\" \"",TagBox[ FractionBox["1", RowBox[{"x", "+", TemplateBox[{"x"}, "Abs"]}]], DisplayForm]}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9, 3.74453836461134*^9, {3.744538445101452*^9, 3.744538446307172*^9}, { 3.744538557490464*^9, 3.74453855862071*^9}},ExpressionUUID-> "56390879-18e0-4052-b7f0-46f9eea60f88"], Cell[BoxData[ FormBox[ TemplateBox[{"\" = \"",UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"", "\[Infinity]"}, "RowDefault"]}]],"\" \"",TagBox[ FractionBox["1", RowBox[{"2", " ", "x"}]], DisplayForm]}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9, 3.74453836461134*^9, {3.744538445101452*^9, 3.744538446307172*^9}, { 3.744538557490464*^9, 3.744538558628648*^9}},ExpressionUUID-> "5cd8395e-01c1-4fb8-b552-30de3d060f74"], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\" = \"\>", "\[InvisibleSpace]", "0"}], SequenceForm[" = ", 0], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9, 3.74453836461134*^9, {3.744538445101452*^9, 3.744538446307172*^9}, { 3.744538557490464*^9, 3.7445385586378403`*^9}},ExpressionUUID-> "ec08ce0c-b41f-48ce-959c-ebe2d4593859"], "\n", Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\"AH\"\>", "\[InvisibleSpace]", "\<\" \[Congruent] \"\>", "\[InvisibleSpace]", FormBox[ RowBox[{"y", "\[LongEqual]", "0"}], TraditionalForm], "\[InvisibleSpace]", "\<\" \[AGrave] droite\"\>"}], SequenceForm["AH", " \[Congruent] ", math`Droite[$CellContext`y == 0], " \[AGrave] droite"], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.744537690562817*^9, 3.744537738889546*^9, 3.744538016641222*^9, 3.7445381659711857`*^9, 3.744538250724907*^9, 3.744538365262484*^9, 3.7445384466818027`*^9, 3.744538559132433*^9}, ExpressionUUID->"e59bbbdf-c708-44b3-87fc-e4f98aae7625"], "\n\n", Cell[BoxData[ FormBox[ TemplateBox[{FormBox[ TemplateBox[{ UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]], RowBox[{ SqrtBox[ RowBox[{ SuperscriptBox["x", "2"], "+", "1"}]], "-", "x"}]}, "RowDefault"], TraditionalForm],"\" = [\"","\[Infinity]","\"+(\"", "\[Infinity]","\")]\""}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9, 3.74453836461134*^9, {3.744538445101452*^9, 3.744538446307172*^9}, { 3.744538557490464*^9, 3.7445385586601686`*^9}},ExpressionUUID-> "07d7e5d7-bb47-471f-abca-5a301804eae0"], " ", Cell[BoxData[ FormBox[ RowBox[{"=", RowBox[{"+", "\[Infinity]"}]}], TraditionalForm]], FormatType->"TraditionalForm",ExpressionUUID-> "ac848a5e-4d07-4c3c-a203-8e4e4d87fe40"], "\tpas d\[CloseCurlyQuote]AV \[AGrave] gauche\nAO ?\n\n", Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ StyleBox["\<\"a = \"\>", StripOnInput->False, FontSlant->Italic], "\[InvisibleSpace]", UnderscriptBox["\<\"lim \"\>", RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]], "\[InvisibleSpace]", TagBox[ FractionBox[ RowBox[{"f", RowBox[{"(", "x", ")"}]}], "x"], DisplayForm], "\[InvisibleSpace]", "\<\" = \"\>"}], SequenceForm[ Style["a = ", Italic], Underscript["lim ", $CellContext`x -> DirectedInfinity[-1]], DisplayForm[ FractionBox["f(x)", "x"]], " = "], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9, 3.74453836461134*^9, {3.744538445101452*^9, 3.744538446307172*^9}, { 3.744538557490464*^9, 3.7445385588254423`*^9}},ExpressionUUID-> "136439ff-37bb-404b-94c1-dc8519cce3cf"], "\n", Cell[BoxData[ FormBox[ TemplateBox[{UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]],"\" \"",FractionBox[ RowBox[{ SqrtBox[ RowBox[{ SuperscriptBox["x", "2"], "+", "1"}]], "-", "x"}], "x"],"\" = \"", UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]],TagBox[ FractionBox[ RowBox[{ SqrtBox[ SuperscriptBox["x", "2"]], "-", "x"}], "x"], DisplayForm],"\" = \"", UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]],TagBox[ FractionBox[ RowBox[{ RowBox[{"-", "2"}], " ", "x"}], "x"], DisplayForm],"\" = \"", UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]],RowBox[{"-", "2"}],"\" =\"", RowBox[{"-", "2"}]}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9, 3.74453836461134*^9, {3.744538445101452*^9, 3.744538446307172*^9}, { 3.744538557490464*^9, 3.744538558837714*^9}},ExpressionUUID-> "4b01e8c4-f96f-4763-917f-e8f86c071ea3"], "\n\n", Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ StyleBox["\<\"b = \"\>", StripOnInput->False, FontSlant->Italic], "\[InvisibleSpace]", UnderscriptBox["\<\"lim \"\>", RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]], "\[InvisibleSpace]", StyleBox["\<\"f(x) - a x = \"\>", StripOnInput->False, FontSlant->Italic]}], SequenceForm[ Style["b = ", Italic], Underscript["lim ", $CellContext`x -> DirectedInfinity[-1]], Style["f(x) - a x = ", Italic]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9, 3.74453836461134*^9, {3.744538445101452*^9, 3.744538446307172*^9}, { 3.744538557490464*^9, 3.744538558846695*^9}},ExpressionUUID-> "dc1298b3-3b76-49ed-84f8-853c91f51496"], "\n", Cell[BoxData[ FormBox[ TemplateBox[{FormBox[ TemplateBox[{ UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]], RowBox[{ SqrtBox[ RowBox[{ SuperscriptBox["x", "2"], "+", "1"}]], "+", "x"}]}, "RowDefault"], TraditionalForm],"\" = [\"","\[Infinity]","\"+(\"", RowBox[{"-", "\[Infinity]"}],"\")]\""}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9, 3.74453836461134*^9, {3.744538445101452*^9, 3.744538446307172*^9}, { 3.744538557490464*^9, 3.744538558858457*^9}},ExpressionUUID-> "9d011f69-bf15-4063-9469-70d55a8dcdb0"], "\n", Cell[BoxData[ FormBox[ TemplateBox[{"\" = \"",UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]],"\" \"",TagBox[ FractionBox[ RowBox[{ RowBox[{"(", RowBox[{ SqrtBox[ RowBox[{ SuperscriptBox["x", "2"], "+", "1"}]], "-", "x"}], ")"}], " ", RowBox[{"(", RowBox[{"x", "+", SqrtBox[ RowBox[{ SuperscriptBox["x", "2"], "+", "1"}]]}], ")"}]}], RowBox[{ SqrtBox[ RowBox[{ SuperscriptBox["x", "2"], "+", "1"}]], "-", "x"}]], DisplayForm]}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9, 3.74453836461134*^9, {3.744538445101452*^9, 3.744538446307172*^9}, { 3.744538557490464*^9, 3.744538558865485*^9}},ExpressionUUID-> "a8e49b0d-f8b7-45fd-a3dc-317eb452e49b"], Cell[BoxData[ FormBox[ TemplateBox[{"\" = \"",UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]],"\" \"",TagBox[ FractionBox["1", RowBox[{ SqrtBox[ RowBox[{ SuperscriptBox["x", "2"], "+", "1"}]], "-", "x"}]], DisplayForm]}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9, 3.74453836461134*^9, {3.744538445101452*^9, 3.744538446307172*^9}, { 3.744538557490464*^9, 3.7445385588721743`*^9}},ExpressionUUID-> "787f3203-ce97-4085-aecf-b140c6cba2d4"], "\n", Cell[BoxData[ FormBox[ TemplateBox[{"\" = \"",UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]],"\" \"",TagBox[ FractionBox["1", RowBox[{ SqrtBox[ SuperscriptBox["x", "2"]], "-", "x"}]], DisplayForm]}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9, 3.74453836461134*^9, {3.744538445101452*^9, 3.744538446307172*^9}, { 3.744538557490464*^9, 3.744538558886753*^9}},ExpressionUUID-> "26605747-81db-4f6f-8628-0e362a10d5d4"], Cell[BoxData[ FormBox[ TemplateBox[{"\" = \"",UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]],"\" \"",TagBox[ FractionBox["1", RowBox[{ TemplateBox[{"x"}, "Abs"], "-", "x"}]], DisplayForm]}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9, 3.74453836461134*^9, {3.744538445101452*^9, 3.744538446307172*^9}, { 3.744538557490464*^9, 3.74453855889375*^9}},ExpressionUUID-> "97ccdcd4-92f2-4e7a-a619-b8be4bd8eb0e"], "\n", Cell[BoxData[ FormBox[ TemplateBox[{"\" = \"",UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]],"\" \"",TagBox[ FractionBox["1", RowBox[{ RowBox[{"-", "2"}], " ", "x"}]], DisplayForm]}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9, 3.74453836461134*^9, {3.744538445101452*^9, 3.744538446307172*^9}, { 3.744538557490464*^9, 3.7445385589007273`*^9}},ExpressionUUID-> "2e906f41-17a6-48e9-8c7d-8c269139f965"], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\" = \"\>", "\[InvisibleSpace]", "0"}], SequenceForm[" = ", 0], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9, 3.74453836461134*^9, {3.744538445101452*^9, 3.744538446307172*^9}, { 3.744538557490464*^9, 3.744538558974649*^9}},ExpressionUUID-> "ffe9de65-bee4-496f-a90c-bef19a41bbc4"], "\n\n\n", Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\"AO\"\>", "\[InvisibleSpace]", "\<\" \[Congruent] \"\>", "\[InvisibleSpace]", FormBox[ RowBox[{"y", "\[LongEqual]", RowBox[{ RowBox[{"-", "2"}], " ", "x"}]}], TraditionalForm], "\[InvisibleSpace]", "\<\" \[AGrave] gauche\"\>"}], SequenceForm["AO", " \[Congruent] ", math`Droite[$CellContext`y == (-2) $CellContext`x], " \[AGrave] gauche"], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.744537690562817*^9, 3.744537738889546*^9, 3.744538016641222*^9, 3.7445381659711857`*^9, 3.744538250724907*^9, 3.744538365262484*^9, 3.7445384466818027`*^9, 3.744538559137203*^9}, ExpressionUUID->"c6b315a7-5cd0-4b93-8fbc-47a9ac6ec9a5"] }], "Titre2", CellChangeTimes->{ 3.641727865504284*^9, {3.74453854174886*^9, 3.744538600484869*^9}, { 3.744538631985836*^9, 3.744538689280818*^9}, {3.744538726249382*^9, 3.7445387298452797`*^9}, {3.744538773327799*^9, 3.744538838071562*^9}},ExpressionUUID->"7b92208d-6ef6-4537-a93d-\ 2d204a0e2cb5"], Cell[TextData[{ "9) ", Cell[BoxData[ FormBox[ RowBox[{ RowBox[{"f", "(", "x", ")"}], "=", FractionBox[ RowBox[{"x", " ", RowBox[{"\[LeftBracketingBar]", RowBox[{"x", "-", "1"}], "\[RightBracketingBar]"}]}], RowBox[{ SuperscriptBox["x", "2"], "-", "1"}]]}], TraditionalForm]], ExpressionUUID->"9563e6d2-8888-4486-a22a-c185229bcfbe"], "\n", Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\"Dom f = \"\>", "\[InvisibleSpace]", FormBox[ InterpretationBox["\<\"\\!\\(\\*FormBox[TemplateBox[List[], \\\"Reals\\\ \"], TraditionalForm]\\) \\\\ {\\!\\(\\*FormBox[RowBox[{\\\"-\\\", \ \\\"1\\\"}], TraditionalForm]\\),\\!\\(\\*FormBox[\\\"1\\\", TraditionalForm]\ \\)}\"\>", StringForm["`1` \\ {`2`,`3`}", Reals, -1, 1], Editable->False], TraditionalForm]}], SequenceForm["Dom f = ", math`Ens[ Or[$CellContext`x < -1, Inequality[-1, Less, $CellContext`x, Less, 1], $CellContext`x > 1], $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9, 3.74453836461134*^9, {3.744538445101452*^9, 3.744538446307172*^9}, { 3.744538557490464*^9, 3.744538558553184*^9}, 3.7445388761124973`*^9}, ExpressionUUID->"a477fa26-a551-4381-8f77-8b6e0e3036c3"], "\n\n", Cell[BoxData[ FormBox[ TemplateBox[{UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", RowBox[{"-", "1"}]}]],FractionBox[ RowBox[{"x", " ", TemplateBox[{ RowBox[{"x", "-", "1"}]}, "Abs"]}], RowBox[{ SuperscriptBox["x", "2"], "-", "1"}]],"\" = [\"",TagBox[ FractionBox[ RowBox[{"-", "2"}], "0"], DisplayForm],"\"]\""}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9, 3.74453836461134*^9, {3.744538445101452*^9, 3.744538446307172*^9}, { 3.744538557490464*^9, 3.744538558553184*^9}, 3.744538876135716*^9}, ExpressionUUID->"a13b1256-1c22-408e-8a69-e9074b4901ab"], "\n", Cell[BoxData[ FormBox[ TagBox[GridBox[{ {"\[Piecewise]", GridBox[{ { TemplateBox[{FormBox[ TemplateBox[{ UnderscriptBox["\"lim\"", UnderscriptBox[ RowBox[{"x", "\[Rule]", RowBox[{"-", "1"}]}], "\"<\""]], "\" \"", FractionBox[ RowBox[{"x", " ", TemplateBox[{ RowBox[{"x", "-", "1"}]}, "Abs"]}], RowBox[{ SuperscriptBox["x", "2"], "-", "1"}]]}, "RowDefault"], TraditionalForm],"\" = \"",RowBox[{"-", "\[Infinity]"}]}, "RowDefault"], "\<\" \"\>"}, { TemplateBox[{FormBox[ TemplateBox[{ UnderscriptBox["\"lim\"", UnderscriptBox[ RowBox[{"x", "\[Rule]", RowBox[{"-", "1"}]}], "\">\""]], "\" \"", FractionBox[ RowBox[{"x", " ", TemplateBox[{ RowBox[{"x", "-", "1"}]}, "Abs"]}], RowBox[{ SuperscriptBox["x", "2"], "-", "1"}]]}, "RowDefault"], TraditionalForm],"\" = \"", TemplateBox[{"\"+\"", "\[Infinity]"}, "RowDefault"]}, "RowDefault"], "\<\" \"\>"} }, AllowedDimensions->{2, Automatic}, Editable->True, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.84]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}, Selectable->True]} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.35]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "Piecewise", DeleteWithContents->True, Editable->False, SelectWithContents->True, Selectable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9, 3.74453836461134*^9, {3.744538445101452*^9, 3.744538446307172*^9}, { 3.744538557490464*^9, 3.744538558553184*^9}, 3.744538876198522*^9}, ExpressionUUID->"00269099-1549-4143-8fca-31768b9b897f"], Cell[BoxData[ FormBox[ TemplateBox[{"\"AV \[Congruent] \"","x","\" = \"",RowBox[{"-", "1"}]}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{3.744537690562817*^9, 3.744537738889546*^9, 3.744538016641222*^9, 3.7445381659711857`*^9, 3.744538250724907*^9, 3.744538365262484*^9, 3.7445384466818027`*^9, 3.744538559097744*^9, 3.744538876817194*^9},ExpressionUUID-> "7573e811-de4b-42f7-97b7-555a6bdd3cd6"], "\n\n", Cell[BoxData[ FormBox[ TemplateBox[{UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", "1"}]],FractionBox[ RowBox[{"x", " ", TemplateBox[{ RowBox[{"x", "-", "1"}]}, "Abs"]}], RowBox[{ SuperscriptBox["x", "2"], "-", "1"}]],"\" = [\"",TagBox[ FractionBox["0", "0"], DisplayForm],"\"]\""}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9, 3.74453836461134*^9, {3.744538445101452*^9, 3.744538446307172*^9}, { 3.744538557490464*^9, 3.744538558553184*^9}, 3.7445388762787743`*^9}, ExpressionUUID->"044471f9-ace5-4f1c-b69e-d314779b65b7"], "\n", Cell[BoxData[ FormBox[ TagBox[GridBox[{ {"\[Piecewise]", GridBox[{ { TemplateBox[{FormBox[ TemplateBox[{ UnderscriptBox["\"lim\"", UnderscriptBox[ RowBox[{"x", "\[Rule]", "1"}], "\"<\""]], "\" \"", FractionBox[ RowBox[{"x", " ", TemplateBox[{ RowBox[{"x", "-", "1"}]}, "Abs"]}], RowBox[{ SuperscriptBox["x", "2"], "-", "1"}]]}, "RowDefault"], TraditionalForm],"\" = \"",RowBox[{"-", FractionBox["1", "2"]}]}, "RowDefault"], "\<\" \"\>"}, { TemplateBox[{FormBox[ TemplateBox[{ UnderscriptBox["\"lim\"", UnderscriptBox[ RowBox[{"x", "\[Rule]", "1"}], "\">\""]], "\" \"", FractionBox[ RowBox[{"x", " ", TemplateBox[{ RowBox[{"x", "-", "1"}]}, "Abs"]}], RowBox[{ SuperscriptBox["x", "2"], "-", "1"}]]}, "RowDefault"], TraditionalForm],"\" = \"",FractionBox["1", "2"]}, "RowDefault"], "\<\" \"\>"} }, AllowedDimensions->{2, Automatic}, Editable->True, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.84]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}, Selectable->True]} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.35]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "Piecewise", DeleteWithContents->True, Editable->False, SelectWithContents->True, Selectable->False], TraditionalForm]], "Print", CellChangeTimes->{3.744537690562817*^9, 3.744537738889546*^9, 3.744538016641222*^9, 3.7445381659711857`*^9, 3.744538250724907*^9, 3.744538365262484*^9, 3.7445384466818027`*^9, 3.744538559097744*^9, 3.744538876846367*^9},ExpressionUUID-> "0b5bb3d4-2ef3-4695-9c58-dd9831dda844"], "\n\n", Cell[BoxData[ FormBox[ TemplateBox[{UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"", "\[Infinity]"}, "RowDefault"]}]],FractionBox[ RowBox[{"x", " ", TemplateBox[{ RowBox[{"x", "-", "1"}]}, "Abs"]}], RowBox[{ SuperscriptBox["x", "2"], "-", "1"}]],"\" = \"",UnderscriptBox[ "\"lim \"", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"", "\[Infinity]"}, "RowDefault"]}]],TagBox[ FractionBox[ RowBox[{"x", " ", TemplateBox[{ RowBox[{"x", "-", "1"}]}, "Abs"]}], SuperscriptBox["x", "2"]], DisplayForm],"\" = \"",UnderscriptBox[ "\"lim \"", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"", "\[Infinity]"}, "RowDefault"]}]],"\" \"", FractionBox[ TemplateBox[{ RowBox[{"x", "-", "1"}]}, "Abs"], "x"],"\" = \"","1"}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9, 3.74453836461134*^9, {3.744538445101452*^9, 3.744538446307172*^9}, { 3.744538557490464*^9, 3.744538558553184*^9}, 3.7445388764186373`*^9}, ExpressionUUID->"21874f9c-8118-457f-b043-f9c15a6c169f"], "\n", Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\"AH\"\>", "\[InvisibleSpace]", "\<\" \[Congruent] \"\>", "\[InvisibleSpace]", FormBox[ RowBox[{"y", "\[LongEqual]", "1"}], TraditionalForm], "\[InvisibleSpace]", "\<\" \[AGrave] droite\"\>"}], SequenceForm["AH", " \[Congruent] ", math`Droite[$CellContext`y == 1], " \[AGrave] droite"], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.744537690562817*^9, 3.744537738889546*^9, 3.744538016641222*^9, 3.7445381659711857`*^9, 3.744538250724907*^9, 3.744538365262484*^9, 3.7445384466818027`*^9, 3.744538559097744*^9, 3.744538876927064*^9},ExpressionUUID-> "9b865d7d-10cb-4e14-b4b8-7b9dfcdcff5d"], "\n\n", Cell[BoxData[ FormBox[ TemplateBox[{UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]],FractionBox[ RowBox[{"x", " ", TemplateBox[{ RowBox[{"x", "-", "1"}]}, "Abs"]}], RowBox[{ SuperscriptBox["x", "2"], "-", "1"}]],"\" = \"",UnderscriptBox[ "\"lim \"", RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]],TagBox[ FractionBox[ RowBox[{"x", " ", TemplateBox[{ RowBox[{"x", "-", "1"}]}, "Abs"]}], SuperscriptBox["x", "2"]], DisplayForm],"\" = \"",UnderscriptBox[ "\"lim \"", RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]],"\" \"",RowBox[{ FractionBox["1", "x"], "-", "1"}],"\" = \"",RowBox[{"-", "1"}]}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9, 3.74453836461134*^9, {3.744538445101452*^9, 3.744538446307172*^9}, { 3.744538557490464*^9, 3.744538558553184*^9}, 3.744538876440325*^9}, ExpressionUUID->"e3d832c3-c9dd-4fa2-a7a6-1a45435c2e59"], "\n", Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\"AH\"\>", "\[InvisibleSpace]", "\<\" \[Congruent] \"\>", "\[InvisibleSpace]", FormBox[ RowBox[{"y", "\[LongEqual]", RowBox[{"-", "1"}]}], TraditionalForm], "\[InvisibleSpace]", "\<\" \[AGrave] gauche\"\>"}], SequenceForm["AH", " \[Congruent] ", math`Droite[$CellContext`y == -1], " \[AGrave] gauche"], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.744537690562817*^9, 3.744537738889546*^9, 3.744538016641222*^9, 3.7445381659711857`*^9, 3.744538250724907*^9, 3.744538365262484*^9, 3.7445384466818027`*^9, 3.744538559097744*^9, 3.7445388769310627`*^9},ExpressionUUID-> "26fa43c3-d209-4f5b-bd70-7aacaa26df61"] }], "Titre2", CellChangeTimes->{ 3.641727865504284*^9, {3.744538859842531*^9, 3.74453890555204*^9}, { 3.744538938785891*^9, 3.744538941226377*^9}, {3.744538974629383*^9, 3.744538995696333*^9}},ExpressionUUID->"fae92062-bda0-4bb4-9f6e-\ 6e2065e1d0f8"], Cell[TextData[{ "10) ", Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ StyleBox["\<\"f(x) = \"\>", StripOnInput->False, FontSlant->Italic], "\[InvisibleSpace]", FractionBox[ TemplateBox[{RowBox[{ SuperscriptBox["x", "2"], "-", "x", "-", "2"}]}, "Abs"], RowBox[{ RowBox[{"2", " ", "x"}], "+", "1"}]]}], SequenceForm[ Style["f(x) = ", Italic], (1 + 2 $CellContext`x)^(-1) Abs[-2 - $CellContext`x + $CellContext`x^2]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9, 3.74453836461134*^9, {3.744538445101452*^9, 3.744538446307172*^9}, { 3.744538557490464*^9, 3.744538558553184*^9}, 3.7445388761060543`*^9, 3.744539032446052*^9},ExpressionUUID-> "f8179958-c644-4584-96e8-886231396e0f"], "\n", Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\"Dom f = \"\>", "\[InvisibleSpace]", FormBox[ InterpretationBox["\<\"\\!\\(\\*FormBox[TemplateBox[List[], \\\"Reals\\\ \"], TraditionalForm]\\) \\\\ {\\!\\(\\*FormBox[RowBox[{\\\"-\\\", \ FractionBox[\\\"1\\\", \\\"2\\\"]}], TraditionalForm]\\)}\"\>", StringForm["`1` \\ {`2`}", Reals, Rational[-1, 2]], Editable->False], TraditionalForm]}], SequenceForm["Dom f = ", math`Ens[ Or[$CellContext`x < Rational[-1, 2], $CellContext`x > Rational[-1, 2]], $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9, 3.74453836461134*^9, {3.744538445101452*^9, 3.744538446307172*^9}, { 3.744538557490464*^9, 3.744538558553184*^9}, 3.7445388761060543`*^9, 3.744539032454255*^9},ExpressionUUID-> "f927f2dd-cb4b-4383-b42b-0405a7887c1c"], "\n\n", Cell[BoxData[ FormBox[ TemplateBox[{UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", RowBox[{"-", FractionBox["1", "2"]}]}]],FractionBox[ TemplateBox[{ RowBox[{ SuperscriptBox["x", "2"], "-", "x", "-", "2"}]}, "Abs"], RowBox[{ RowBox[{"2", " ", "x"}], "+", "1"}]],"\" = [\"",TagBox[ FractionBox[ FractionBox["5", "4"], "0"], DisplayForm],"\"]\""}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9, 3.74453836461134*^9, {3.744538445101452*^9, 3.744538446307172*^9}, { 3.744538557490464*^9, 3.744538558553184*^9}, 3.7445388761060543`*^9, 3.744539032476103*^9},ExpressionUUID-> "ade88fc8-32a1-46e2-a923-99267ffc40ac"], " ", Cell[BoxData[ FormBox[ RowBox[{"=", RowBox[{"\[PlusMinus]", "\[Infinity]"}]}], TraditionalForm]], FormatType->"TraditionalForm",ExpressionUUID-> "2e2f447d-8506-48c1-8daf-05a371e631d1"], "\n", Cell[BoxData[ FormBox[ TagBox[GridBox[{ {"\[Piecewise]", GridBox[{ { TemplateBox[{FormBox[ TemplateBox[{ UnderscriptBox["\"lim\"", UnderscriptBox[ RowBox[{"x", "\[Rule]", RowBox[{"-", FractionBox["1", "2"]}]}], "\"<\""]], "\" \"", FractionBox[ TemplateBox[{ RowBox[{ SuperscriptBox["x", "2"], "-", "x", "-", "2"}]}, "Abs"], RowBox[{ RowBox[{"2", " ", "x"}], "+", "1"}]]}, "RowDefault"], TraditionalForm],"\" = \"",RowBox[{"-", "\[Infinity]"}]}, "RowDefault"], "\<\" \"\>"}, { TemplateBox[{FormBox[ TemplateBox[{ UnderscriptBox["\"lim\"", UnderscriptBox[ RowBox[{"x", "\[Rule]", RowBox[{"-", FractionBox["1", "2"]}]}], "\">\""]], "\" \"", FractionBox[ TemplateBox[{ RowBox[{ SuperscriptBox["x", "2"], "-", "x", "-", "2"}]}, "Abs"], RowBox[{ RowBox[{"2", " ", "x"}], "+", "1"}]]}, "RowDefault"], TraditionalForm],"\" = \"", TemplateBox[{"\"+\"", "\[Infinity]"}, "RowDefault"]}, "RowDefault"], "\<\" \"\>"} }, AllowedDimensions->{2, Automatic}, Editable->True, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.84]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}, Selectable->True]} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxItemSize->{ "Columns" -> {{Automatic}}, "ColumnsIndexed" -> {}, "Rows" -> {{1.}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.35]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], "Piecewise", DeleteWithContents->True, Editable->False, SelectWithContents->True, Selectable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9, 3.74453836461134*^9, {3.744538445101452*^9, 3.744538446307172*^9}, { 3.744538557490464*^9, 3.744538558553184*^9}, 3.7445388761060543`*^9, 3.7445390325864697`*^9},ExpressionUUID-> "4381ec91-2023-42b8-a97d-9f3c0f506a4d"], Cell[BoxData[ FormBox[ TemplateBox[{"\"AV \[Congruent] \"","x","\" = \"",RowBox[{"-", FractionBox["1", "2"]}]}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{3.744537690562817*^9, 3.744537738889546*^9, 3.744538016641222*^9, 3.7445381659711857`*^9, 3.744538250724907*^9, 3.744538365262484*^9, 3.7445384466818027`*^9, 3.744538559097744*^9, 3.74453887667245*^9, 3.744539033590568*^9},ExpressionUUID-> "02c26ed7-0a0e-43d9-b439-2097a0b2b8fc"], "\n\n", Cell[BoxData[ FormBox[ RowBox[{ RowBox[{ UnderscriptBox[ RowBox[{"lim", " "}], RowBox[{"x", "\[Rule]", RowBox[{"+", "\[Infinity]"}]}]], FractionBox[ RowBox[{"|", RowBox[{ SuperscriptBox["x", "2"], "-", "x", "-", "2"}], "|"}], RowBox[{ RowBox[{"2", "x"}], "+", "1"}]]}], "="}], TraditionalForm]], FormatType->"TraditionalForm",ExpressionUUID-> "31b59221-138b-49af-b24f-3222835aea2f"], Cell[BoxData[ FormBox[ TemplateBox[{UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"", "\[Infinity]"}, "RowDefault"]}]],"\" \"", FractionBox[ RowBox[{ SuperscriptBox["x", "2"], "-", "x", "-", "2"}], RowBox[{ RowBox[{"2", " ", "x"}], "+", "1"}]],"\" = \"",UnderscriptBox[ "\"lim \"", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"", "\[Infinity]"}, "RowDefault"]}]],TagBox[ FractionBox[ SuperscriptBox["x", "2"], RowBox[{"2", " ", "x"}]], DisplayForm],"\" = \"",UnderscriptBox[ "\"lim \"", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"", "\[Infinity]"}, "RowDefault"]}]],"\" \"", FractionBox["x", "2"],"\" = \"",InterpretationBox[ "\"+\\!\\(\\*FormBox[\\\"\[Infinity]\\\", TraditionalForm]\\)\"", StringForm["+`1`", DirectedInfinity[1]], Editable -> False]}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{3.7445392477064943`*^9},ExpressionUUID-> "c67cbbb2-b67d-41bf-8bb5-36c74ab33d7c"], "\npas d\[CloseCurlyQuote]AH\nAO ?\n", Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ StyleBox["\<\"a = \"\>", StripOnInput->False, FontSlant->Italic], "\[InvisibleSpace]", UnderscriptBox["\<\"lim \"\>", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"","\[Infinity]"}, "RowDefault"]}]], "\[InvisibleSpace]", TagBox[ FractionBox[ RowBox[{"f", RowBox[{"(", "x", ")"}]}], "x"], DisplayForm], "\[InvisibleSpace]", "\<\" = \"\>"}], SequenceForm[ Style["a = ", Italic], Underscript["lim ", $CellContext`x -> Row[{"+", DirectedInfinity[1]}]], DisplayForm[ FractionBox["f(x)", "x"]], " = "], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9, 3.74453836461134*^9, {3.744538445101452*^9, 3.744538446307172*^9}, { 3.744538557490464*^9, 3.744538558553184*^9}, 3.7445388761060543`*^9, 3.744539032864108*^9},ExpressionUUID-> "5427bee9-ea5d-44a5-b837-33915d34f6a7"], "\n", Cell[BoxData[ FormBox[ RowBox[{ RowBox[{ UnderscriptBox[ RowBox[{"lim", " "}], RowBox[{"x", "\[Rule]", RowBox[{"+", "\[Infinity]"}]}]], FractionBox[ TemplateBox[{RowBox[{ SuperscriptBox["x", "2"], "-", "x", "-", "2"}]}, "Abs"], RowBox[{"x", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "x"}], "+", "1"}], ")"}]}]]}], "=", RowBox[{ RowBox[{ UnderscriptBox[ RowBox[{"lim", " "}], RowBox[{"x", "\[Rule]", RowBox[{"+", "\[Infinity]"}]}]], FractionBox[ RowBox[{ SuperscriptBox["x", "2"], "-", "x", "-", "2"}], RowBox[{"x", "(", RowBox[{ RowBox[{"2", "x"}], "+", "1"}], ")"}]]}], "=", RowBox[{ RowBox[{ UnderscriptBox[ RowBox[{"lim", " "}], RowBox[{"x", "\[Rule]", RowBox[{"+", "\[Infinity]"}]}]], FractionBox[ SuperscriptBox["x", "2"], RowBox[{"2", SuperscriptBox["x", "2"]}]]}], "=", FractionBox["1", "2"]}]}]}], TraditionalForm]], FormatType->"TraditionalForm",ExpressionUUID-> "8672242f-9e88-47cc-a82c-16fc9736519c"], "\n\n", Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ StyleBox["\<\"b = \"\>", StripOnInput->False, FontSlant->Italic], "\[InvisibleSpace]", UnderscriptBox["\<\"lim \"\>", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"","\[Infinity]"}, "RowDefault"]}]], "\[InvisibleSpace]", StyleBox["\<\"f(x) - a x = \"\>", StripOnInput->False, FontSlant->Italic]}], SequenceForm[ Style["b = ", Italic], Underscript["lim ", $CellContext`x -> Row[{"+", DirectedInfinity[1]}]], Style["f(x) - a x = ", Italic]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9, 3.74453836461134*^9, {3.744538445101452*^9, 3.744538446307172*^9}, { 3.744538557490464*^9, 3.744538558553184*^9}, 3.7445388761060543`*^9, 3.744539032898198*^9},ExpressionUUID-> "5c862e7f-913c-437a-ac97-ab539c21a0f4"], "\n", Cell[BoxData[ FormBox[ RowBox[{ RowBox[{ RowBox[{ UnderscriptBox[ RowBox[{"lim", " "}], RowBox[{"x", "\[Rule]", RowBox[{"+", "\[Infinity]"}]}]], FractionBox[ TemplateBox[{RowBox[{ SuperscriptBox["x", "2"], "-", "x", "-", "2"}]}, "Abs"], RowBox[{ RowBox[{"2", " ", "x"}], "+", "1"}]]}], "-", FractionBox["x", "2"]}], "="}], TraditionalForm]], FormatType->"TraditionalForm",ExpressionUUID-> "77274c4e-5ca3-4bd6-9cbf-a009cbf129d3"], Cell[BoxData[ FormBox[ TemplateBox[{UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"", "\[Infinity]"}, "RowDefault"]}]],RowBox[{ FractionBox[ RowBox[{ SuperscriptBox["x", "2"], "-", "x", "-", "2"}], RowBox[{ RowBox[{"2", " ", "x"}], "+", "1"}]], "-", FractionBox["x", "2"]}],"\" = \"",UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"", "\[Infinity]"}, "RowDefault"]}]],RowBox[{ FractionBox[ RowBox[{ SuperscriptBox["x", "2"], "-", "x", "-", "2"}], RowBox[{ RowBox[{"2", " ", "x"}], "+", "1"}]], "-", FractionBox["x", "2"]}],"\" = \"",UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", TemplateBox[{"\"+\"", "\[Infinity]"}, "RowDefault"]}]],RowBox[{"-", FractionBox[ RowBox[{ RowBox[{"3", " ", "x"}], "+", "4"}], RowBox[{ RowBox[{"4", " ", "x"}], "+", "2"}]]}],"\" = \""," ",RowBox[{"-", FractionBox["3", "4"]}]}, "RowDefault"], TraditionalForm]], "Print", GeneratedCell->False, CellAutoOverwrite->False, CellChangeTimes->{ 3.744539247694214*^9, {3.74453933913501*^9, 3.744539352001487*^9}, 3.744539393908346*^9, 3.744539604603097*^9},ExpressionUUID-> "109d9d06-4a2f-4d6e-b84b-ff1a37649706"], "\n\n\n", Cell[BoxData[ FormBox[ RowBox[{ RowBox[{ UnderscriptBox[ RowBox[{"lim", " "}], RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]], FractionBox[ RowBox[{"|", RowBox[{ SuperscriptBox["x", "2"], "-", "x", "-", "2"}], "|"}], RowBox[{ RowBox[{"2", "x"}], "+", "1"}]]}], "="}], TraditionalForm]], FormatType->"TraditionalForm",ExpressionUUID-> "e1152ba8-01c6-4428-811f-289ff0258994"], Cell[BoxData[ FormBox[ TemplateBox[{UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]],"\" \"",FractionBox[ RowBox[{ SuperscriptBox["x", "2"], "-", "x", "-", "2"}], RowBox[{ RowBox[{"2", " ", "x"}], "+", "1"}]],"\" = \"",UnderscriptBox[ "\"lim \"", RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]],TagBox[ FractionBox[ SuperscriptBox["x", "2"], RowBox[{"2", " ", "x"}]], DisplayForm],"\" = \"",UnderscriptBox[ "\"lim \"", RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]],"\" \"",FractionBox["x", "2"], "\" = \"",RowBox[{"-", "\[Infinity]"}]}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{ 3.744539247694214*^9, {3.74453933913501*^9, 3.744539352001487*^9}, 3.744539393928628*^9},ExpressionUUID-> "957969c3-0e94-49f8-a0e8-956be75da011"], "\npas d\[CloseCurlyQuote]AH\nAO ?\n", Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ StyleBox["\<\"a = \"\>", StripOnInput->False, FontSlant->Italic], "\[InvisibleSpace]", UnderscriptBox["\<\"lim \"\>", RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]], "\[InvisibleSpace]", TagBox[ FractionBox[ RowBox[{"f", RowBox[{"(", "x", ")"}]}], "x"], DisplayForm], "\[InvisibleSpace]", "\<\" = \"\>"}], SequenceForm[ Style["a = ", Italic], Underscript["lim ", $CellContext`x -> DirectedInfinity[-1]], DisplayForm[ FractionBox["f(x)", "x"]], " = "], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9, 3.74453836461134*^9, {3.744538445101452*^9, 3.744538446307172*^9}, { 3.744538557490464*^9, 3.744538558553184*^9}, 3.7445388761060543`*^9, 3.744539032985403*^9},ExpressionUUID-> "a8154827-914e-4db5-868f-9835f097dbb3"], "\n", Cell[BoxData[ FormBox[ RowBox[{ RowBox[{ UnderscriptBox[ RowBox[{"lim", " "}], RowBox[{"x", "\[Rule]", RowBox[{"+", "\[Infinity]"}]}]], FractionBox[ TemplateBox[{RowBox[{ SuperscriptBox["x", "2"], "-", "x", "-", "2"}]}, "Abs"], RowBox[{"x", " ", RowBox[{"(", RowBox[{ RowBox[{"2", " ", "x"}], "+", "1"}], ")"}]}]]}], "="}], TraditionalForm]],ExpressionUUID->"9c02422a-0246-4096-9611-32d4ca645ec6"], Cell[BoxData[ FormBox[ TemplateBox[{UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]],"\" \"",FractionBox[ RowBox[{ SuperscriptBox["x", "2"], "-", "x", "-", "2"}], RowBox[{ RowBox[{"2", " ", SuperscriptBox["x", "2"]}], "+", "x"}]],"\" = \"",UnderscriptBox[ "\"lim \"", RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]],TagBox[ FractionBox[ SuperscriptBox["x", "2"], RowBox[{"2", " ", SuperscriptBox["x", "2"]}]], DisplayForm],"\" = \"",FractionBox[ "1", "2"]}, "RowDefault"], TraditionalForm]], "Print", CellChangeTimes->{ 3.744539247694214*^9, {3.74453933913501*^9, 3.744539352001487*^9}, 3.744539393908346*^9, 3.744539604568019*^9, 3.7445396588625298`*^9, 3.744539692260476*^9, {3.7445397349592247`*^9, 3.744539784055743*^9}}, ExpressionUUID->"db8400df-ad6c-481b-9ffa-6dd975ea4c34"], "\n\n", Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{ StyleBox["\<\"b = \"\>", StripOnInput->False, FontSlant->Italic], "\[InvisibleSpace]", UnderscriptBox["\<\"lim \"\>", RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]], "\[InvisibleSpace]", StyleBox["\<\"f(x) - a x = \"\>", StripOnInput->False, FontSlant->Italic]}], SequenceForm[ Style["b = ", Italic], Underscript["lim ", $CellContext`x -> DirectedInfinity[-1]], Style["f(x) - a x = ", Italic]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.744537568656942*^9, 3.74453773767432*^9, {3.744538014749229*^9, 3.744538015961337*^9}, 3.744538164353807*^9, 3.7445382498827963`*^9, 3.74453836461134*^9, {3.744538445101452*^9, 3.744538446307172*^9}, { 3.744538557490464*^9, 3.744538558553184*^9}, 3.7445388761060543`*^9, 3.744539033012239*^9},ExpressionUUID-> "6720ef7c-ae61-4995-8da9-7ccfe233ec08"], "\n", Cell[BoxData[ FormBox[ RowBox[{ RowBox[{ UnderscriptBox[ RowBox[{"lim", " "}], RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]], FractionBox[ RowBox[{"|", RowBox[{ SuperscriptBox["x", "2"], "-", "x", "-", "2"}], "|"}], RowBox[{ RowBox[{"2", "x"}], "+", "1"}]]}], "-", FractionBox["x", "2"]}], TraditionalForm]], FormatType->"TraditionalForm",ExpressionUUID-> "3536adf2-ffcd-4c10-a60c-88c1a2f28c2a"], Cell[BoxData[ FormBox[ TemplateBox[{" "," ","\" = \"",UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]],RowBox[{ FractionBox[ RowBox[{ SuperscriptBox["x", "2"], "-", "x", "-", "2"}], RowBox[{ RowBox[{"2", " ", "x"}], "+", "1"}]], "-", FractionBox["x", "2"]}],"\" = \"",UnderscriptBox["\"lim \"", RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]],RowBox[{"-", FractionBox[ RowBox[{ RowBox[{"3", " ", "x"}], "+", "4"}], RowBox[{ RowBox[{"4", " ", "x"}], "+", "2"}]]}],"\" = \"",UnderscriptBox[ "\"lim \"", RowBox[{"x", "\[Rule]", RowBox[{"-", "\[Infinity]"}]}]],RowBox[{"-", FractionBox["3", "4"]}]}, "RowDefault"], TraditionalForm]], "Print", GeneratedCell->False, CellAutoOverwrite->False, CellChangeTimes->{ 3.744539247694214*^9, {3.74453933913501*^9, 3.744539352001487*^9}, 3.744539393908346*^9, 3.744539604568019*^9, 3.7445396588625298`*^9, 3.744539692260476*^9, {3.7445397349592247`*^9, 3.744539784037168*^9}, { 3.744539824169528*^9, 3.744539841483478*^9}},ExpressionUUID-> "9ea5f5ce-e003-4bc4-b71e-297597065eb1"], "\n\n", Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"\<\"AO\"\>", "\[InvisibleSpace]", "\<\" \[Congruent] \"\>", "\[InvisibleSpace]", RowBox[{"y", "\[LongEqual]", RowBox[{ FractionBox["x", "2"], "-", FractionBox["3", "4"]}]}]}], SequenceForm[ "AO", " \[Congruent] ", $CellContext`y == Rational[-3, 4] + Rational[1, 2] $CellContext`x], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.744537690562817*^9, 3.744537738889546*^9, 3.744538016641222*^9, 3.7445381659711857`*^9, 3.744538250724907*^9, 3.744538365262484*^9, 3.7445384466818027`*^9, 3.744538559097744*^9, 3.74453887667245*^9, 3.7445390337384768`*^9},ExpressionUUID-> "8fe97709-0f42-43a7-bdc8-cf55690d9b99"] }], "Titre2", CellChangeTimes->{ 3.641727865504284*^9, {3.744539045831513*^9, 3.744539355595173*^9}, { 3.7445393972921143`*^9, 3.744539669367321*^9}, {3.74453970549452*^9, 3.744539722665606*^9}, {3.7445397875695133`*^9, 3.74453987671418*^9}},ExpressionUUID->"6b7226a5-15f7-47f4-82c1-\ 386905de6a69"] }, Closed]] }, WindowSize->{849, 844}, WindowMargins->{{234, Automatic}, {Automatic, 11}}, PrintingCopies->1, PrintingPageRange->{1, Automatic}, CellLabelAutoDelete->True, FrontEndVersion->"11.3 for Mac OS X x86 (32-bit, 64-bit Kernel) (March 5, \ 2018)", StyleDefinitions->"stylemath_16.nb" ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[567, 22, 210, 6, 88, "Section",ExpressionUUID->"85737426-8297-44d6-bb43-aafa78d35bed"], Cell[780, 30, 492, 16, 57, "Titre2",ExpressionUUID->"ad2ed5c8-f35a-4e26-a161-807b8ed56685"], Cell[1275, 48, 505, 17, 72, "Titre2",ExpressionUUID->"6987991d-d633-48e7-b848-f11dbeddd1e5"], Cell[1783, 67, 537, 17, 44, "Titre2",ExpressionUUID->"8b90cf7e-3826-4b50-bd6c-731822185135"], Cell[2323, 86, 531, 17, 70, "Titre2",ExpressionUUID->"ae532d0c-3da4-422d-b721-3b8a6ca47b73"], Cell[2857, 105, 477, 16, 82, "Titre2",ExpressionUUID->"0bc630de-47a9-4166-8ce8-74d4bb20a355"], Cell[3337, 123, 504, 17, 64, "Titre2",ExpressionUUID->"a0e6e35a-86d3-4a4d-9c41-8a6c7b2fd507"], Cell[3844, 142, 450, 15, 44, "Titre2",ExpressionUUID->"fa6fd366-d7d4-454d-959c-4e01a8598208"], Cell[4297, 159, 484, 17, 46, "Titre2",ExpressionUUID->"35707ae8-1e7b-45ad-ab43-fa03078d8f8c"], Cell[4784, 178, 582, 18, 63, "Titre2",ExpressionUUID->"d2e96fae-86d6-43bf-a8e6-7679748b8a17"], Cell[CellGroupData[{ Cell[5391, 200, 600, 19, 70, "Titre2",ExpressionUUID->"4eb1d86c-76d3-4569-b653-999e4f645da7"], Cell[5994, 221, 99, 1, 4, "PageBreak",ExpressionUUID->"a63f0290-9d6c-4f15-9f17-f651ceba8aea", PageBreakBelow->True] }, Open ]] }, Open ]], Cell[CellGroupData[{ Cell[6142, 228, 83, 0, 58, "Section",ExpressionUUID->"0a93e072-0862-4229-b8e2-4bb111e9b4fe"], Cell[CellGroupData[{ Cell[6250, 232, 874, 25, 23, "Input",ExpressionUUID->"42b755b3-f01a-426c-933a-c4681df6dfa5", CellOpen->False], Cell[CellGroupData[{ Cell[7149, 261, 904, 21, 34, "Print",ExpressionUUID->"0bc98a19-2a15-496a-ab74-3066afe0e9c9"], Cell[8056, 284, 616, 12, 55, "Print",ExpressionUUID->"1f53e467-f96a-4754-b692-d060f85a330a"], Cell[8675, 298, 616, 12, 55, "Print",ExpressionUUID->"112f2724-5001-4fb4-a33b-7244d3e8416c"], Cell[9294, 312, 837, 18, 55, "Print",ExpressionUUID->"3b886a96-fefc-4361-be81-c78e8ff91f4b"], Cell[10134, 332, 789, 18, 55, "Print",ExpressionUUID->"5b3565d5-ce1b-4e86-948b-bf195c9991ae"], Cell[10926, 352, 567, 15, 55, "Print",ExpressionUUID->"7f72066d-ad36-4af4-a329-a4c0887bd913"], Cell[11496, 369, 564, 15, 55, "Print",ExpressionUUID->"5d83a616-4b82-4867-ba9f-40e83a559754"], Cell[12063, 386, 1381, 33, 34, "Print",ExpressionUUID->"b730d69f-8cd3-4731-9b8f-fb809b3152d1"], Cell[13447, 421, 635, 13, 69, "Print",ExpressionUUID->"324f9c50-3a65-4126-8ff9-aacff4caa9a1"], Cell[14085, 436, 615, 13, 69, "Print",ExpressionUUID->"887aee34-3387-4146-906a-f3a29ef6adc5"], Cell[14703, 451, 2621, 46, 151, "Print",ExpressionUUID->"5a051e8c-1d93-4cfc-99ac-6242b4a3e774"], Cell[17327, 499, 346, 8, 34, "Print",ExpressionUUID->"d1ac2cd1-c0e5-4f70-b4fa-1b011de2aac9"], Cell[17676, 509, 729, 14, 69, "Print",ExpressionUUID->"835bd512-45a5-4049-9fa8-0606eb859255"], Cell[18408, 525, 672, 14, 69, "Print",ExpressionUUID->"7f3c2884-d531-4e40-bcc7-dde16223836f"], Cell[19083, 541, 499, 13, 34, "Print",ExpressionUUID->"f3d41cce-1dd2-46ad-9b93-7a4c35d7236c"], Cell[19585, 556, 478, 12, 35, "Print",ExpressionUUID->"174dc975-d4ef-4260-88ab-9fa2518c7462"], Cell[20066, 570, 566, 16, 34, "Print",ExpressionUUID->"359efcc1-19dd-4d76-be3b-eac7151cf9fe"], Cell[20635, 588, 612, 11, 52, "Print",ExpressionUUID->"dd2ee7e5-2478-4944-a333-3f4ba7bbdb7b"], Cell[21250, 601, 720, 14, 52, "Print",ExpressionUUID->"f781f54d-214a-4669-80a3-105fa3c590c1"], Cell[21973, 617, 665, 14, 52, "Print",ExpressionUUID->"259d6714-0dec-47c5-b685-0f81f7020436"], Cell[22641, 633, 478, 12, 34, "Print",ExpressionUUID->"9bc665ef-a256-4cfe-8acb-da6143e056ac"], Cell[23122, 647, 608, 17, 34, "Print",ExpressionUUID->"4d08f233-d279-4ceb-ad9a-70d9820267b3"], Cell[23733, 666, 737, 16, 73, "Print",ExpressionUUID->"bb6c40d9-b9dc-48eb-8ba9-bb14ddd65853"], Cell[24473, 684, 372, 8, 34, "Print",ExpressionUUID->"50f16281-20d6-4742-8c8c-670fe08d4759"], Cell[24848, 694, 716, 16, 73, "Print",ExpressionUUID->"ecd77712-f27d-4501-abe5-618fed30e4b6"], Cell[25567, 712, 364, 8, 35, "Print",ExpressionUUID->"fd20c044-6116-4bc2-aa5e-03ac8e6639a1"], Cell[25934, 722, 672, 13, 66, "Print",ExpressionUUID->"93da6784-3704-4077-9928-285786c52b53"], Cell[26609, 737, 622, 12, 66, "Print",ExpressionUUID->"e7671b97-be91-4829-81f3-802fdf5d71a1"], Cell[27234, 751, 902, 21, 34, "Print",ExpressionUUID->"ad411d46-bdc6-43ee-9442-98caec97ad24"], Cell[28139, 774, 617, 13, 78, "Print",ExpressionUUID->"d1b89f19-6b8c-406c-bd84-31c1273aaf46"], Cell[28759, 789, 757, 15, 86, "Print",ExpressionUUID->"aceb4a77-ef81-4544-b514-12941f8bf64c"], Cell[29519, 806, 366, 8, 34, "Print",ExpressionUUID->"139a20c9-32cd-41b3-993b-79615eca731e"], Cell[29888, 816, 726, 14, 78, "Print",ExpressionUUID->"de7ed6e6-ef73-44d4-9629-dab6ce2e81b4"], Cell[30617, 832, 676, 14, 78, "Print",ExpressionUUID->"d1075406-3e48-4d74-bccd-6378c176399a"], Cell[31296, 848, 395, 9, 34, "Print",ExpressionUUID->"bb9b1bdb-3e54-4f75-9397-37772296eb5e"], Cell[31694, 859, 1018, 25, 34, "Print",ExpressionUUID->"ae3c1fa3-265d-4e87-a7ab-9cddad16c5e8"], Cell[32715, 886, 671, 14, 61, "Print",ExpressionUUID->"6f51f979-8328-49d5-98d3-2b616bbe0003"], Cell[33389, 902, 651, 14, 61, "Print",ExpressionUUID->"8cb44f3e-8274-4b47-9f82-5e599f683c49"], Cell[34043, 918, 736, 14, 61, "Print",ExpressionUUID->"a4511eac-46ef-4e24-bac6-3fbc3883d410"], Cell[34782, 934, 680, 13, 61, "Print",ExpressionUUID->"54ba068a-c3df-4381-abc8-dcdc2030b1f6"], Cell[35465, 949, 480, 12, 34, "Print",ExpressionUUID->"c4a91af7-adb7-473b-ba88-8ba29c93fac2"], Cell[35948, 963, 572, 15, 34, "Print",ExpressionUUID->"f93b8684-77fb-4f7b-aa11-6241af6f7470"], Cell[36523, 980, 619, 12, 52, "Print",ExpressionUUID->"ee0efc99-a575-4d44-82d0-7e7c5993ea60"], Cell[37145, 994, 806, 17, 52, "Print",ExpressionUUID->"667835cc-f02c-45f1-8cc5-96538266ed69"], Cell[37954, 1013, 642, 13, 52, "Print",ExpressionUUID->"17801421-9859-46cd-a06f-b84e073ee323"], Cell[38599, 1028, 461, 14, 34, "Print",ExpressionUUID->"8c5f8562-e5ac-4c7f-835e-b4dbc0e868c2"], Cell[39063, 1044, 189, 4, 34, "Print",ExpressionUUID->"87ea0f44-2a27-4fcf-953d-ca7f2e958eba"], Cell[39255, 1050, 709, 14, 55, "Print",ExpressionUUID->"5933b78c-1cc1-4192-bf76-f2b8f4d8ff3c"], Cell[39967, 1066, 767, 18, 55, "Print",ExpressionUUID->"d3713e55-25d6-46bd-a933-6b93032e9617"], Cell[40737, 1086, 480, 12, 34, "Print",ExpressionUUID->"2ba5e504-b610-40bc-b503-c485014f1dcc"], Cell[41220, 1100, 781, 20, 34, "Print",ExpressionUUID->"2ee42a25-3471-41da-82e5-2b704094248f"], Cell[42004, 1122, 3221, 51, 129, "Print",ExpressionUUID->"b99161c5-da95-4b23-8d60-186e5307d181"], Cell[45228, 1175, 356, 8, 34, "Print",ExpressionUUID->"7a233f43-a374-4e98-bf5d-92102ccd2b91"], Cell[45587, 1185, 2946, 49, 129, "Print",ExpressionUUID->"d9d45130-6c3f-4f73-ad97-a14f9f89a7cb"], Cell[48536, 1236, 820, 16, 59, "Print",ExpressionUUID->"5628e986-64b4-4d11-ade6-2a6167df57ca"], Cell[49359, 1254, 780, 16, 59, "Print",ExpressionUUID->"2de2c3ed-e33b-48f8-8f70-8884a7cf1517"], Cell[50142, 1272, 478, 12, 34, "Print",ExpressionUUID->"4c600a9e-dc25-4b09-b5a4-eda7d0304d7a"], Cell[50623, 1286, 499, 13, 35, "Print",ExpressionUUID->"adf5c204-d3cd-4c3a-94e1-1c7bb00fbcb3"], Cell[51125, 1301, 759, 20, 55, "Print",ExpressionUUID->"3ce170e6-b582-4ffd-9fc6-758c5e9e441b"], Cell[51887, 1323, 3469, 57, 181, "Print",ExpressionUUID->"743e8ff1-2234-4c53-975e-4d31487d78c1"], Cell[55359, 1382, 390, 9, 55, "Print",ExpressionUUID->"f50f391a-6bfd-4006-b37d-46fd9a8e97e8"], Cell[55752, 1393, 940, 20, 67, "Print",ExpressionUUID->"7a2aadf4-2c6d-4f4d-bb04-d6d2964c061d"], Cell[56695, 1415, 823, 17, 67, "Print",ExpressionUUID->"e92bf15b-db56-4769-a076-bdc6536718ee"], Cell[57521, 1434, 526, 14, 56, "Print",ExpressionUUID->"a25dc6d3-8f1d-46d0-942a-c331d14f5053"] }, Open ]] }, Open ]], Cell[58074, 1452, 99, 1, 4, "PageBreak",ExpressionUUID->"aca3670a-cac1-4b4e-917d-5c4a90d1856c", PageBreakBelow->True] }, Open ]], Cell[CellGroupData[{ Cell[58210, 1458, 716, 13, 58, "Section",ExpressionUUID->"3bf80c5e-1f5c-44ca-aa08-a0ea9bb1eb28"], Cell[58929, 1473, 25826, 712, 1145, "Titre2",ExpressionUUID->"e6e5154b-6b95-4909-8f25-469ab35286d5"], Cell[84758, 2187, 11104, 282, 656, "Titre2",ExpressionUUID->"767a2a2c-60c2-426c-b05d-82d7c1c6a429"], Cell[95865, 2471, 6998, 207, 484, "Titre2",ExpressionUUID->"506a86ab-03f5-4f58-9c02-ff3085646f50"], Cell[102866, 2680, 5334, 147, 488, "Titre2",ExpressionUUID->"3b6c331c-1fdc-4cc3-8801-651f2d4ba4b6"], Cell[108203, 2829, 4901, 126, 442, "Titre2",ExpressionUUID->"a93bca99-ef63-4414-971f-da1184f4665e"], Cell[113107, 2957, 8973, 238, 551, "Titre2",ExpressionUUID->"cc4d3ff9-b5ec-4d1f-b7c7-49af579d5947"], Cell[122083, 3197, 8011, 201, 549, "Titre2",ExpressionUUID->"c07e2124-6949-48b2-b7b0-3317bf2680fb"], Cell[130097, 3400, 18480, 465, 986, "Titre2",ExpressionUUID->"7b92208d-6ef6-4537-a93d-2d204a0e2cb5"], Cell[148580, 3867, 13806, 342, 671, "Titre2",ExpressionUUID->"fae92062-bda0-4bb4-9f6e-6e2065e1d0f8"], Cell[162389, 4211, 21503, 581, 1201, "Titre2",ExpressionUUID->"6b7226a5-15f7-47f4-82c1-386905de6a69"] }, Closed]] } ] *)