(* 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[ 60470, 1710] NotebookOptionsPosition[ 57170, 1611] NotebookOutlinePosition[ 57916, 1637] CellTagsIndexPosition[ 57873, 1634] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[CellGroupData[{ Cell["\<\ D\[EAcute]terminer les int\[EAcute]grales ind\[EAcute]finies suivantes\ \>", "Section", CellChangeTimes->{ 3.4118812294304123`*^9, {3.41188126183496*^9, 3.411881263849903*^9}, { 3.4118816061006193`*^9, 3.4118816331064453`*^9}}], Cell[CellGroupData[{ Cell[BoxData[{ RowBox[{ RowBox[{"n", "=", "0"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"n", "++"}], ";", RowBox[{ RowBox[{"int", "[", "n", "]"}], "=", RowBox[{"Integrale", "[", RowBox[{"5", ",", "x"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"n", "++"}], ";", RowBox[{ RowBox[{"int", "[", "n", "]"}], "=", RowBox[{"Integrale", "[", RowBox[{"x", ",", "x"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"n", "++"}], ";", RowBox[{ RowBox[{"int", "[", "n", "]"}], "=", RowBox[{"Integrale", "[", RowBox[{ RowBox[{"3", "x"}], ",", "x"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"n", "++"}], ";", RowBox[{ RowBox[{"int", "[", "n", "]"}], "=", RowBox[{"Integrale", "[", RowBox[{ RowBox[{ RowBox[{"-", "2"}], RowBox[{"x", "^", "2"}]}], ",", "x"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"n", "++"}], ";", RowBox[{ RowBox[{"int", "[", "n", "]"}], "=", RowBox[{"Integrale", "[", RowBox[{ RowBox[{"HoldForm", "[", RowBox[{ RowBox[{"x", "^", "2"}], "-", RowBox[{"4", "x"}], "+", "3"}], "]"}], ",", "x"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"n", "++"}], ";", RowBox[{ RowBox[{"int", "[", "n", "]"}], "=", RowBox[{"Integrale", "[", RowBox[{ RowBox[{"HoldForm", "[", RowBox[{ RowBox[{"-", "5"}], RowBox[{"x", "^", "2"}]}], "]"}], ",", "x"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"n", "++"}], ";", RowBox[{ RowBox[{"int", "[", "n", "]"}], "=", RowBox[{"Integrale", "[", RowBox[{ RowBox[{"HoldForm", "[", RowBox[{ RowBox[{"7", "x"}], "-", "1"}], "]"}], ",", "x"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"n", "++"}], ";", RowBox[{ RowBox[{"int", "[", "n", "]"}], "=", RowBox[{"Integrale", "[", RowBox[{ RowBox[{"HoldForm", "[", RowBox[{ RowBox[{"x", "^", "2"}], "/", "3"}], "]"}], ",", "x"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"n", "++"}], ";", RowBox[{ RowBox[{"int", "[", "n", "]"}], "=", RowBox[{"Integrale", "[", RowBox[{ RowBox[{"3", RowBox[{"x", "^", "4"}]}], ",", "x"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"n", "++"}], ";", RowBox[{ RowBox[{"int", "[", "n", "]"}], "=", RowBox[{"Integrale", "[", RowBox[{ RowBox[{"HoldForm", "[", RowBox[{ RowBox[{"(", RowBox[{"x", "-", "5"}], ")"}], "/", "3"}], "]"}], ",", "x"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"n", "++"}], ";", RowBox[{ RowBox[{"int", "[", "n", "]"}], "=", RowBox[{"Integrale", "[", RowBox[{ RowBox[{ RowBox[{"-", "2"}], "x"}], ",", "x"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"n", "++"}], ";", RowBox[{ RowBox[{"int", "[", "n", "]"}], "=", RowBox[{"Integrale", "[", RowBox[{ RowBox[{"HoldForm", "[", RowBox[{"4", "-", RowBox[{"3", "x"}]}], "]"}], ",", "x"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"n", "++"}], ";", RowBox[{ RowBox[{"int", "[", "n", "]"}], "=", RowBox[{"Integrale", "[", RowBox[{ RowBox[{"HoldForm", "[", RowBox[{ RowBox[{"x", "^", "3"}], "+", RowBox[{"2", RowBox[{"x", "^", "2"}]}]}], "]"}], ",", "x"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"n", "++"}], ";", RowBox[{ RowBox[{"int", "[", "n", "]"}], "=", RowBox[{"Integrale", "[", RowBox[{ RowBox[{"HoldForm", "[", RowBox[{ RowBox[{"x", "^", "3"}], "-", RowBox[{"x", "^", "2"}], "+", "x", "-", "1"}], "]"}], ",", "x"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"n", "++"}], ";", RowBox[{ RowBox[{"int", "[", "n", "]"}], "=", RowBox[{"Integrale", "[", RowBox[{ RowBox[{"HoldForm", "[", RowBox[{ RowBox[{ RowBox[{"-", "3"}], "/", RowBox[{"x", "^", "2"}]}], "+", "x", "+", "1"}], "]"}], ",", "x"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"n", "++"}], ";", RowBox[{ RowBox[{"int", "[", "n", "]"}], "=", RowBox[{"Integrale", "[", RowBox[{ RowBox[{"HoldForm", "[", RowBox[{ RowBox[{"(", RowBox[{"3", "-", RowBox[{"5", "x"}]}], ")"}], "/", "4"}], "]"}], ",", "x"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"n", "++"}], ";", RowBox[{ RowBox[{"int", "[", "n", "]"}], "=", RowBox[{"Integrale", "[", RowBox[{ RowBox[{"HoldForm", "[", RowBox[{ RowBox[{"5", "x"}], "+", "3", "+", RowBox[{"5", "/", RowBox[{"x", "^", "2"}]}]}], "]"}], ",", "x"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"n", "++"}], ";", RowBox[{ RowBox[{"int", "[", "n", "]"}], "=", RowBox[{"Integrale", "[", RowBox[{ RowBox[{"HoldForm", "[", RowBox[{"3", RowBox[{"(", RowBox[{ RowBox[{"x", "^", "2"}], "+", "x"}], ")"}]}], "]"}], ",", "x"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"n", "++"}], ";", RowBox[{ RowBox[{"int", "[", "n", "]"}], "=", RowBox[{"Integrale", "[", RowBox[{ RowBox[{"HoldForm", "[", RowBox[{"x", "+", RowBox[{"2", "/", RowBox[{"Sqrt", "[", "x", "]"}]}]}], "]"}], ",", "x"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"n", "++"}], ";", RowBox[{ RowBox[{"int", "[", "n", "]"}], "=", RowBox[{"Integrale", "[", RowBox[{ RowBox[{"HoldForm", "[", RowBox[{ RowBox[{"(", RowBox[{"x", "-", "1"}], ")"}], RowBox[{"(", RowBox[{"x", "+", "1"}], ")"}]}], "]"}], ",", "x"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"n", "++"}], ";", RowBox[{ RowBox[{"int", "[", "n", "]"}], "=", RowBox[{"Integrale", "[", RowBox[{ RowBox[{"HoldForm", "[", RowBox[{ RowBox[{"3", RowBox[{"x", "^", "2"}]}], "+", RowBox[{"2", "x"}], "+", "2"}], "]"}], ",", "x"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"n", "++"}], ";", RowBox[{ RowBox[{"int", "[", "n", "]"}], "=", RowBox[{"Integrale", "[", RowBox[{ RowBox[{"x", "^", "9"}], ",", "x"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"n", "++"}], ";", RowBox[{ RowBox[{"int", "[", "n", "]"}], "=", RowBox[{"Integrale", "[", RowBox[{ RowBox[{"1", "/", RowBox[{"x", "^", "4"}]}], ",", "x"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"n", "++"}], ";", RowBox[{ RowBox[{"int", "[", "n", "]"}], "=", RowBox[{"Integrale", "[", RowBox[{ RowBox[{"5", "/", RowBox[{"x", "^", "7"}]}], ",", "x"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"n", "++"}], ";", RowBox[{ RowBox[{"int", "[", "n", "]"}], "=", RowBox[{"Integrale", "[", RowBox[{ RowBox[{"HoldForm", "[", RowBox[{ RowBox[{"5", "x"}], "+", RowBox[{"2", "/", RowBox[{"x", "^", "2"}]}]}], "]"}], ",", "x"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"n", "++"}], ";", RowBox[{ RowBox[{"int", "[", "n", "]"}], "=", RowBox[{"Integrale", "[", RowBox[{ RowBox[{"HoldForm", "[", RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"2", "x"}], "-", "5"}], ")"}], "^", "2"}], "]"}], ",", "x"}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"n", "++"}], ";", RowBox[{ RowBox[{"int", "[", "n", "]"}], "=", RowBox[{"Integrale", "[", RowBox[{ RowBox[{"HoldForm", "[", RowBox[{ RowBox[{ RowBox[{"(", RowBox[{ RowBox[{"3", "x"}], "-", "2"}], ")"}], "^", "2"}], "/", "x"}], "]"}], ",", "x"}], "]"}]}], ";"}], "\[IndentingNewLine]"}], "\[IndentingNewLine]", RowBox[{"Do", "[", RowBox[{ RowBox[{"Print", "[", RowBox[{"i", ",", "\"\<) \>\"", ",", RowBox[{"int", "[", "i", "]"}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}]}], "]"}]}], "Input", CellOpen->False, CellChangeTimes->{{3.411881228833897*^9, 3.411881229389295*^9}, { 3.4118813299312973`*^9, 3.411881414455546*^9}, {3.411881473215354*^9, 3.411881499524557*^9}, {3.4118815944662933`*^9, 3.411881595943473*^9}, { 3.445407313258144*^9, 3.445407437809647*^9}, {3.445408762012685*^9, 3.445408877519042*^9}, {3.445408963996027*^9, 3.445409022513815*^9}}], Cell[CellGroupData[{ Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"1", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", FormBox[ TagBox[ RowBox[{"\[Integral]", RowBox[{"5", RowBox[{"\[DifferentialD]", "x"}]}]}], HoldForm], TraditionalForm]}], SequenceForm[1, ") ", analyse`Integrale[5, $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.445407439641371*^9, 3.4454079015922403`*^9, 3.4454079600711193`*^9, 3.445408008013797*^9, {3.445408141282235*^9, 3.445408158578285*^9}, 3.445408222410551*^9, 3.445408587675631*^9, {3.445408879873784*^9, 3.445408900966177*^9}, 3.445409025219811*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"2", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", FormBox[ TagBox[ RowBox[{"\[Integral]", RowBox[{"x", RowBox[{"\[DifferentialD]", "x"}]}]}], HoldForm], TraditionalForm]}], SequenceForm[2, ") ", analyse`Integrale[$CellContext`x, $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.445407439641371*^9, 3.4454079015922403`*^9, 3.4454079600711193`*^9, 3.445408008013797*^9, {3.445408141282235*^9, 3.445408158578285*^9}, 3.445408222410551*^9, 3.445408587675631*^9, {3.445408879873784*^9, 3.445408900966177*^9}, 3.445409025222062*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"3", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", FormBox[ TagBox[ RowBox[{"\[Integral]", RowBox[{ RowBox[{"3", " ", "x"}], RowBox[{"\[DifferentialD]", "x"}]}]}], HoldForm], TraditionalForm]}], SequenceForm[3, ") ", analyse`Integrale[3 $CellContext`x, $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.445407439641371*^9, 3.4454079015922403`*^9, 3.4454079600711193`*^9, 3.445408008013797*^9, {3.445408141282235*^9, 3.445408158578285*^9}, 3.445408222410551*^9, 3.445408587675631*^9, {3.445408879873784*^9, 3.445408900966177*^9}, 3.445409025224174*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"4", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", FormBox[ TagBox[ RowBox[{"\[Integral]", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", SuperscriptBox["x", "2"]}], RowBox[{"\[DifferentialD]", "x"}]}]}], HoldForm], TraditionalForm]}], SequenceForm[4, ") ", analyse`Integrale[(-2) $CellContext`x^2, $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.445407439641371*^9, 3.4454079015922403`*^9, 3.4454079600711193`*^9, 3.445408008013797*^9, {3.445408141282235*^9, 3.445408158578285*^9}, 3.445408222410551*^9, 3.445408587675631*^9, {3.445408879873784*^9, 3.445408900966177*^9}, 3.445409025251875*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"5", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", FormBox[ TagBox[ RowBox[{"\[Integral]", RowBox[{ RowBox[{"(", TagBox[ RowBox[{ SuperscriptBox["x", "2"], "-", RowBox[{"4", " ", "x"}], "+", "3"}], HoldForm], ")"}], RowBox[{"\[DifferentialD]", "x"}]}]}], HoldForm], TraditionalForm]}], SequenceForm[5, ") ", analyse`Integrale[ HoldForm[$CellContext`x^2 - 4 $CellContext`x + 3], $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.445407439641371*^9, 3.4454079015922403`*^9, 3.4454079600711193`*^9, 3.445408008013797*^9, {3.445408141282235*^9, 3.445408158578285*^9}, 3.445408222410551*^9, 3.445408587675631*^9, {3.445408879873784*^9, 3.445408900966177*^9}, 3.445409025284277*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"6", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", FormBox[ TagBox[ RowBox[{"\[Integral]", RowBox[{ TagBox[ RowBox[{ RowBox[{"-", "5"}], " ", SuperscriptBox["x", "2"]}], HoldForm], RowBox[{"\[DifferentialD]", "x"}]}]}], HoldForm], TraditionalForm]}], SequenceForm[6, ") ", analyse`Integrale[ HoldForm[(-5) $CellContext`x^2], $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.445407439641371*^9, 3.4454079015922403`*^9, 3.4454079600711193`*^9, 3.445408008013797*^9, {3.445408141282235*^9, 3.445408158578285*^9}, 3.445408222410551*^9, 3.445408587675631*^9, {3.445408879873784*^9, 3.445408900966177*^9}, 3.445409025320203*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"7", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", FormBox[ TagBox[ RowBox[{"\[Integral]", RowBox[{ RowBox[{"(", TagBox[ RowBox[{ RowBox[{"7", " ", "x"}], "-", "1"}], HoldForm], ")"}], RowBox[{"\[DifferentialD]", "x"}]}]}], HoldForm], TraditionalForm]}], SequenceForm[7, ") ", analyse`Integrale[ HoldForm[7 $CellContext`x - 1], $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.445407439641371*^9, 3.4454079015922403`*^9, 3.4454079600711193`*^9, 3.445408008013797*^9, {3.445408141282235*^9, 3.445408158578285*^9}, 3.445408222410551*^9, 3.445408587675631*^9, {3.445408879873784*^9, 3.445408900966177*^9}, 3.4454090253520412`*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"8", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", FormBox[ TagBox[ RowBox[{"\[Integral]", RowBox[{ TagBox[ FractionBox[ SuperscriptBox["x", "2"], "3"], HoldForm], RowBox[{"\[DifferentialD]", "x"}]}]}], HoldForm], TraditionalForm]}], SequenceForm[8, ") ", analyse`Integrale[ HoldForm[$CellContext`x^2/3], $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.445407439641371*^9, 3.4454079015922403`*^9, 3.4454079600711193`*^9, 3.445408008013797*^9, {3.445408141282235*^9, 3.445408158578285*^9}, 3.445408222410551*^9, 3.445408587675631*^9, {3.445408879873784*^9, 3.445408900966177*^9}, 3.445409025383909*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"9", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", FormBox[ TagBox[ RowBox[{"\[Integral]", RowBox[{ RowBox[{"3", " ", SuperscriptBox["x", "4"]}], RowBox[{"\[DifferentialD]", "x"}]}]}], HoldForm], TraditionalForm]}], SequenceForm[9, ") ", analyse`Integrale[3 $CellContext`x^4, $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.445407439641371*^9, 3.4454079015922403`*^9, 3.4454079600711193`*^9, 3.445408008013797*^9, {3.445408141282235*^9, 3.445408158578285*^9}, 3.445408222410551*^9, 3.445408587675631*^9, {3.445408879873784*^9, 3.445408900966177*^9}, 3.445409025417314*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"10", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", FormBox[ TagBox[ RowBox[{"\[Integral]", RowBox[{ TagBox[ FractionBox[ RowBox[{"x", "-", "5"}], "3"], HoldForm], RowBox[{"\[DifferentialD]", "x"}]}]}], HoldForm], TraditionalForm]}], SequenceForm[10, ") ", analyse`Integrale[ HoldForm[($CellContext`x - 5)/3], $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.445407439641371*^9, 3.4454079015922403`*^9, 3.4454079600711193`*^9, 3.445408008013797*^9, {3.445408141282235*^9, 3.445408158578285*^9}, 3.445408222410551*^9, 3.445408587675631*^9, {3.445408879873784*^9, 3.445408900966177*^9}, 3.445409025452485*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"11", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", FormBox[ TagBox[ RowBox[{"\[Integral]", RowBox[{ RowBox[{ RowBox[{"-", "2"}], " ", "x"}], RowBox[{"\[DifferentialD]", "x"}]}]}], HoldForm], TraditionalForm]}], SequenceForm[11, ") ", analyse`Integrale[(-2) $CellContext`x, $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.445407439641371*^9, 3.4454079015922403`*^9, 3.4454079600711193`*^9, 3.445408008013797*^9, {3.445408141282235*^9, 3.445408158578285*^9}, 3.445408222410551*^9, 3.445408587675631*^9, {3.445408879873784*^9, 3.445408900966177*^9}, 3.4454090254865093`*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"12", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", FormBox[ TagBox[ RowBox[{"\[Integral]", RowBox[{ RowBox[{"(", TagBox[ RowBox[{"4", "-", RowBox[{"3", " ", "x"}]}], HoldForm], ")"}], RowBox[{"\[DifferentialD]", "x"}]}]}], HoldForm], TraditionalForm]}], SequenceForm[12, ") ", analyse`Integrale[ HoldForm[4 - 3 $CellContext`x], $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.445407439641371*^9, 3.4454079015922403`*^9, 3.4454079600711193`*^9, 3.445408008013797*^9, {3.445408141282235*^9, 3.445408158578285*^9}, 3.445408222410551*^9, 3.445408587675631*^9, {3.445408879873784*^9, 3.445408900966177*^9}, 3.4454090255124693`*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"13", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", FormBox[ TagBox[ RowBox[{"\[Integral]", RowBox[{ RowBox[{"(", TagBox[ RowBox[{ SuperscriptBox["x", "3"], "+", RowBox[{"2", " ", SuperscriptBox["x", "2"]}]}], HoldForm], ")"}], RowBox[{"\[DifferentialD]", "x"}]}]}], HoldForm], TraditionalForm]}], SequenceForm[13, ") ", analyse`Integrale[ HoldForm[$CellContext`x^3 + 2 $CellContext`x^2], $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.445407439641371*^9, 3.4454079015922403`*^9, 3.4454079600711193`*^9, 3.445408008013797*^9, {3.445408141282235*^9, 3.445408158578285*^9}, 3.445408222410551*^9, 3.445408587675631*^9, {3.445408879873784*^9, 3.445408900966177*^9}, 3.4454090255363083`*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"14", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", FormBox[ TagBox[ RowBox[{"\[Integral]", RowBox[{ RowBox[{"(", TagBox[ RowBox[{ SuperscriptBox["x", "3"], "-", SuperscriptBox["x", "2"], "+", "x", "-", "1"}], HoldForm], ")"}], RowBox[{"\[DifferentialD]", "x"}]}]}], HoldForm], TraditionalForm]}], SequenceForm[14, ") ", analyse`Integrale[ HoldForm[$CellContext`x^3 - $CellContext`x^2 + $CellContext`x - 1], $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.445407439641371*^9, 3.4454079015922403`*^9, 3.4454079600711193`*^9, 3.445408008013797*^9, {3.445408141282235*^9, 3.445408158578285*^9}, 3.445408222410551*^9, 3.445408587675631*^9, {3.445408879873784*^9, 3.445408900966177*^9}, 3.445409025569194*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"15", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", FormBox[ TagBox[ RowBox[{"\[Integral]", RowBox[{ RowBox[{"(", TagBox[ RowBox[{ RowBox[{"-", FractionBox["3", SuperscriptBox["x", "2"]]}], "+", "x", "+", "1"}], HoldForm], ")"}], RowBox[{"\[DifferentialD]", "x"}]}]}], HoldForm], TraditionalForm]}], SequenceForm[15, ") ", analyse`Integrale[ HoldForm[(-3)/$CellContext`x^2 + $CellContext`x + 1], $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.445407439641371*^9, 3.4454079015922403`*^9, 3.4454079600711193`*^9, 3.445408008013797*^9, {3.445408141282235*^9, 3.445408158578285*^9}, 3.445408222410551*^9, 3.445408587675631*^9, {3.445408879873784*^9, 3.445408900966177*^9}, 3.44540902561024*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"16", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", FormBox[ TagBox[ RowBox[{"\[Integral]", RowBox[{ TagBox[ RowBox[{ FractionBox["1", "4"], " ", RowBox[{"(", RowBox[{"3", "-", RowBox[{"5", " ", "x"}]}], ")"}]}], HoldForm], RowBox[{"\[DifferentialD]", "x"}]}]}], HoldForm], TraditionalForm]}], SequenceForm[16, ") ", analyse`Integrale[ HoldForm[(3 - 5 $CellContext`x)/4], $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.445407439641371*^9, 3.4454079015922403`*^9, 3.4454079600711193`*^9, 3.445408008013797*^9, {3.445408141282235*^9, 3.445408158578285*^9}, 3.445408222410551*^9, 3.445408587675631*^9, {3.445408879873784*^9, 3.445408900966177*^9}, 3.445409025651699*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"17", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", FormBox[ TagBox[ RowBox[{"\[Integral]", RowBox[{ RowBox[{"(", TagBox[ RowBox[{ RowBox[{"5", " ", "x"}], "+", "3", "+", FractionBox["5", SuperscriptBox["x", "2"]]}], HoldForm], ")"}], RowBox[{"\[DifferentialD]", "x"}]}]}], HoldForm], TraditionalForm]}], SequenceForm[17, ") ", analyse`Integrale[ HoldForm[5 $CellContext`x + 3 + 5/$CellContext`x^2], $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.445407439641371*^9, 3.4454079015922403`*^9, 3.4454079600711193`*^9, 3.445408008013797*^9, {3.445408141282235*^9, 3.445408158578285*^9}, 3.445408222410551*^9, 3.445408587675631*^9, {3.445408879873784*^9, 3.445408900966177*^9}, 3.4454090256935167`*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"18", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", FormBox[ TagBox[ RowBox[{"\[Integral]", RowBox[{ TagBox[ RowBox[{"3", " ", RowBox[{"(", RowBox[{ SuperscriptBox["x", "2"], "+", "x"}], ")"}]}], HoldForm], RowBox[{"\[DifferentialD]", "x"}]}]}], HoldForm], TraditionalForm]}], SequenceForm[18, ") ", analyse`Integrale[ HoldForm[3 ($CellContext`x^2 + $CellContext`x)], $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.445407439641371*^9, 3.4454079015922403`*^9, 3.4454079600711193`*^9, 3.445408008013797*^9, {3.445408141282235*^9, 3.445408158578285*^9}, 3.445408222410551*^9, 3.445408587675631*^9, {3.445408879873784*^9, 3.445408900966177*^9}, 3.4454090257172203`*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"19", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", FormBox[ TagBox[ RowBox[{"\[Integral]", RowBox[{ RowBox[{"(", TagBox[ RowBox[{"x", "+", FractionBox["2", SqrtBox["x"]]}], HoldForm], ")"}], RowBox[{"\[DifferentialD]", "x"}]}]}], HoldForm], TraditionalForm]}], SequenceForm[19, ") ", analyse`Integrale[ HoldForm[$CellContext`x + 2/Sqrt[$CellContext`x]], $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.445407439641371*^9, 3.4454079015922403`*^9, 3.4454079600711193`*^9, 3.445408008013797*^9, {3.445408141282235*^9, 3.445408158578285*^9}, 3.445408222410551*^9, 3.445408587675631*^9, {3.445408879873784*^9, 3.445408900966177*^9}, 3.445409025749126*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"20", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", FormBox[ TagBox[ RowBox[{"\[Integral]", RowBox[{ TagBox[ RowBox[{ RowBox[{"(", RowBox[{"x", "-", "1"}], ")"}], " ", RowBox[{"(", RowBox[{"x", "+", "1"}], ")"}]}], HoldForm], RowBox[{"\[DifferentialD]", "x"}]}]}], HoldForm], TraditionalForm]}], SequenceForm[20, ") ", analyse`Integrale[ HoldForm[($CellContext`x - 1) ($CellContext`x + 1)], $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.445407439641371*^9, 3.4454079015922403`*^9, 3.4454079600711193`*^9, 3.445408008013797*^9, {3.445408141282235*^9, 3.445408158578285*^9}, 3.445408222410551*^9, 3.445408587675631*^9, {3.445408879873784*^9, 3.445408900966177*^9}, 3.445409025781981*^9}] }, Open ]] }, Open ]], Cell["", "PageBreak", PageBreakBelow->True], Cell[CellGroupData[{ Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"21", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", FormBox[ TagBox[ RowBox[{"\[Integral]", RowBox[{ RowBox[{"(", TagBox[ RowBox[{ RowBox[{"3", " ", SuperscriptBox["x", "2"]}], "+", RowBox[{"2", " ", "x"}], "+", "2"}], HoldForm], ")"}], RowBox[{"\[DifferentialD]", "x"}]}]}], HoldForm], TraditionalForm]}], SequenceForm[21, ") ", analyse`Integrale[ HoldForm[3 $CellContext`x^2 + 2 $CellContext`x + 2], $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.445407439641371*^9, 3.4454079015922403`*^9, 3.4454079600711193`*^9, 3.445408008013797*^9, {3.445408141282235*^9, 3.445408158578285*^9}, 3.445408222410551*^9, 3.445408587675631*^9, {3.445408879873784*^9, 3.445408900966177*^9}, 3.445409025816186*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"22", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", FormBox[ TagBox[ RowBox[{"\[Integral]", RowBox[{ SuperscriptBox["x", "9"], RowBox[{"\[DifferentialD]", "x"}]}]}], HoldForm], TraditionalForm]}], SequenceForm[22, ") ", analyse`Integrale[$CellContext`x^9, $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.445407439641371*^9, 3.4454079015922403`*^9, 3.4454079600711193`*^9, 3.445408008013797*^9, {3.445408141282235*^9, 3.445408158578285*^9}, 3.445408222410551*^9, 3.445408587675631*^9, {3.445408879873784*^9, 3.445408900966177*^9}, 3.445409025851184*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"23", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", FormBox[ TagBox[ RowBox[{"\[Integral]", RowBox[{ FractionBox["1", SuperscriptBox["x", "4"]], RowBox[{"\[DifferentialD]", "x"}]}]}], HoldForm], TraditionalForm]}], SequenceForm[23, ") ", analyse`Integrale[$CellContext`x^(-4), $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.445407439641371*^9, 3.4454079015922403`*^9, 3.4454079600711193`*^9, 3.445408008013797*^9, {3.445408141282235*^9, 3.445408158578285*^9}, 3.445408222410551*^9, 3.445408587675631*^9, {3.445408879873784*^9, 3.445408900966177*^9}, 3.4454090258846703`*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"24", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", FormBox[ TagBox[ RowBox[{"\[Integral]", RowBox[{ FractionBox["5", SuperscriptBox["x", "7"]], RowBox[{"\[DifferentialD]", "x"}]}]}], HoldForm], TraditionalForm]}], SequenceForm[24, ") ", analyse`Integrale[5 $CellContext`x^(-7), $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.445407439641371*^9, 3.4454079015922403`*^9, 3.4454079600711193`*^9, 3.445408008013797*^9, {3.445408141282235*^9, 3.445408158578285*^9}, 3.445408222410551*^9, 3.445408587675631*^9, {3.445408879873784*^9, 3.445408900966177*^9}, 3.44540902591945*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"25", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", FormBox[ TagBox[ RowBox[{"\[Integral]", RowBox[{ RowBox[{"(", TagBox[ RowBox[{ RowBox[{"5", " ", "x"}], "+", FractionBox["2", SuperscriptBox["x", "2"]]}], HoldForm], ")"}], RowBox[{"\[DifferentialD]", "x"}]}]}], HoldForm], TraditionalForm]}], SequenceForm[25, ") ", analyse`Integrale[ HoldForm[5 $CellContext`x + 2/$CellContext`x^2], $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.445407439641371*^9, 3.4454079015922403`*^9, 3.4454079600711193`*^9, 3.445408008013797*^9, {3.445408141282235*^9, 3.445408158578285*^9}, 3.445408222410551*^9, 3.445408587675631*^9, {3.445408879873784*^9, 3.445408900966177*^9}, 3.445409025952374*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"26", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", FormBox[ TagBox[ RowBox[{"\[Integral]", RowBox[{ TagBox[ SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"2", " ", "x"}], "-", "5"}], ")"}], "2"], HoldForm], RowBox[{"\[DifferentialD]", "x"}]}]}], HoldForm], TraditionalForm]}], SequenceForm[26, ") ", analyse`Integrale[ HoldForm[(2 $CellContext`x - 5)^2], $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.445407439641371*^9, 3.4454079015922403`*^9, 3.4454079600711193`*^9, 3.445408008013797*^9, {3.445408141282235*^9, 3.445408158578285*^9}, 3.445408222410551*^9, 3.445408587675631*^9, {3.445408879873784*^9, 3.445408900966177*^9}, 3.445409025985785*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"27", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", FormBox[ TagBox[ RowBox[{"\[Integral]", RowBox[{ TagBox[ FractionBox[ SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"3", " ", "x"}], "-", "2"}], ")"}], "2"], "x"], HoldForm], RowBox[{"\[DifferentialD]", "x"}]}]}], HoldForm], TraditionalForm]}], SequenceForm[27, ") ", analyse`Integrale[ HoldForm[(3 $CellContext`x - 2)^2/$CellContext`x], $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{ 3.445407439641371*^9, 3.4454079015922403`*^9, 3.4454079600711193`*^9, 3.445408008013797*^9, {3.445408141282235*^9, 3.445408158578285*^9}, 3.445408222410551*^9, 3.445408587675631*^9, {3.445408879873784*^9, 3.445408900966177*^9}, 3.445409026017318*^9}] }, Open ]], Cell[CellGroupData[{ Cell["Solutions", "Subsection"], Cell[CellGroupData[{ Cell[BoxData[ RowBox[{"Do", "[", RowBox[{ RowBox[{"Print", "[", RowBox[{"i", ",", "\"\<) \>\"", ",", RowBox[{"Calcule", "[", RowBox[{"int", "[", "i", "]"}], "]"}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "n"}], "}"}]}], "]"}]], "Input", CellOpen->False, CellChangeTimes->{{3.411881284822002*^9, 3.4118812908038816`*^9}, { 3.411881356073257*^9, 3.411881356305138*^9}, {3.411881511051862*^9, 3.4118815376141367`*^9}, {3.4118815688084784`*^9, 3.4118815791751223`*^9}, { 3.445409060004978*^9, 3.4454091639540443`*^9}, {3.445409218525714*^9, 3.4454092280207777`*^9}}], Cell[CellGroupData[{ Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"1", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\(\ \[Integral] \\(\\(5 \\(\\(\[DifferentialD] x\\)\\)\\)\\)\\)\\)\\) = \ \\!\\(TraditionalForm\\`\\(5\\\\ x\\)\\) + k\"\>", StringForm["`1` = `2` + k", analyse`Integrale[5, $CellContext`x], 5 $CellContext`x], Editable->False]}], SequenceForm[1, ") ", StringForm["`1` = `2` + k", analyse`Integrale[5, $CellContext`x], 5 $CellContext`x]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.4454092286594973`*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"2", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\(\ \[Integral] \\(\\(x \\(\\(\[DifferentialD] x\\)\\)\\)\\)\\)\\)\\) = \ \\!\\(TraditionalForm\\`x\\^2\\/2\\) + k\"\>", StringForm["`1` = `2` + k", analyse`Integrale[$CellContext`x, $CellContext`x], Rational[1, 2] $CellContext`x^2], Editable->False]}], SequenceForm[2, ") ", StringForm["`1` = `2` + k", analyse`Integrale[$CellContext`x, $CellContext`x], Rational[1, 2] $CellContext`x^2]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.4454092286607*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"3", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\(\ \[Integral] \\(\\(\\(\\(3\\\\ x\\)\\) \\(\\(\[DifferentialD] x\\)\\)\\)\\)\\)\ \\)\\) = \\!\\(TraditionalForm\\`\\(3\\\\ x\\^2\\)\\/2\\) + k\"\>", StringForm["`1` = `2` + k", analyse`Integrale[3 $CellContext`x, $CellContext`x], Rational[3, 2] $CellContext`x^2], Editable->False]}], SequenceForm[3, ") ", StringForm["`1` = `2` + k", analyse`Integrale[3 $CellContext`x, $CellContext`x], Rational[3, 2] $CellContext`x^2]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.445409228663601*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"4", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\(\ \[Integral] \\(\\(\\(\\(\\(\\(-2\\)\\)\\\\ x\\^2\\)\\) \\(\\(\[DifferentialD] \ x\\)\\)\\)\\)\\)\\)\\) = \\!\\(TraditionalForm\\`\\(-\\(\\(\\(2\\\\ \ x\\^3\\)\\/3\\)\\)\\)\\) + k\"\>", StringForm["`1` = `2` + k", analyse`Integrale[(-2) $CellContext`x^2, $CellContext`x], Rational[-2, 3] $CellContext`x^3], Editable->False]}], SequenceForm[4, ") ", StringForm["`1` = `2` + k", analyse`Integrale[(-2) $CellContext`x^2, $CellContext`x], Rational[-2, 3] $CellContext`x^3]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.445409228665347*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"5", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\(\ \[Integral] \\(\\(\\(\\((x\\^2 - \\(\\(4\\\\ x\\)\\) + 3)\\)\\) \\(\\(\ \[DifferentialD] x\\)\\)\\)\\)\\)\\)\\) = \ \\!\\(TraditionalForm\\`\\(x\\^3\\/3 - \\(\\(2\\\\ x\\^2\\)\\) + \\(\\(3\\\\ \ x\\)\\)\\)\\) + k\"\>", StringForm["`1` = `2` + k", analyse`Integrale[ HoldForm[$CellContext`x^2 - 4 $CellContext`x + 3], $CellContext`x], 3 $CellContext`x - 2 $CellContext`x^2 + Rational[1, 3] $CellContext`x^3], Editable->False]}], SequenceForm[5, ") ", StringForm["`1` = `2` + k", analyse`Integrale[ HoldForm[$CellContext`x^2 - 4 $CellContext`x + 3], $CellContext`x], 3 $CellContext`x - 2 $CellContext`x^2 + Rational[1, 3] $CellContext`x^3]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.4454092286672087`*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"6", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\(\ \[Integral] \\(\\(\\(\\(\\(\\(-5\\)\\)\\\\ x\\^2\\)\\) \\(\\(\[DifferentialD] \ x\\)\\)\\)\\)\\)\\)\\) = \\!\\(TraditionalForm\\`\\(-\\(\\(\\(5\\\\ \ x\\^3\\)\\/3\\)\\)\\)\\) + k\"\>", StringForm["`1` = `2` + k", analyse`Integrale[ HoldForm[(-5) $CellContext`x^2], $CellContext`x], Rational[-5, 3] $CellContext`x^3], Editable->False]}], SequenceForm[6, ") ", StringForm["`1` = `2` + k", analyse`Integrale[ HoldForm[(-5) $CellContext`x^2], $CellContext`x], Rational[-5, 3] $CellContext`x^3]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.445409228669319*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"7", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\(\ \[Integral] \\(\\(\\(\\((\\(\\(7\\\\ x\\)\\) - 1)\\)\\) \ \\(\\(\[DifferentialD] x\\)\\)\\)\\)\\)\\)\\) = \ \\!\\(TraditionalForm\\`\\(\\(7\\\\ x\\^2\\)\\/2 - x\\)\\) + k\"\>", StringForm["`1` = `2` + k", analyse`Integrale[ HoldForm[7 $CellContext`x - 1], $CellContext`x], -$CellContext`x + Rational[7, 2] $CellContext`x^2], Editable->False]}], SequenceForm[7, ") ", StringForm["`1` = `2` + k", analyse`Integrale[ HoldForm[7 $CellContext`x - 1], $CellContext`x], -$CellContext`x + Rational[7, 2] $CellContext`x^2]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.445409228672022*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"8", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\(\ \[Integral] \\(\\(x\\^2\\/3 \\(\\(\[DifferentialD] x\\)\\)\\)\\)\\)\\)\\) = \ \\!\\(TraditionalForm\\`x\\^3\\/9\\) + k\"\>", StringForm["`1` = `2` + k", analyse`Integrale[ HoldForm[$CellContext`x^2/3], $CellContext`x], Rational[1, 9] $CellContext`x^3], Editable->False]}], SequenceForm[8, ") ", StringForm["`1` = `2` + k", analyse`Integrale[ HoldForm[$CellContext`x^2/3], $CellContext`x], Rational[1, 9] $CellContext`x^3]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.4454092286738567`*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"9", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\(\ \[Integral] \\(\\(\\(\\(3\\\\ x\\^4\\)\\) \\(\\(\[DifferentialD] \ x\\)\\)\\)\\)\\)\\)\\) = \\!\\(TraditionalForm\\`\\(3\\\\ x\\^5\\)\\/5\\) + k\ \"\>", StringForm["`1` = `2` + k", analyse`Integrale[3 $CellContext`x^4, $CellContext`x], Rational[3, 5] $CellContext`x^5], Editable->False]}], SequenceForm[9, ") ", StringForm["`1` = `2` + k", analyse`Integrale[3 $CellContext`x^4, $CellContext`x], Rational[3, 5] $CellContext`x^5]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.4454092286756144`*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"10", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\(\ \[Integral] \\(\\(\\(x - 5\\)\\/3 \\(\\(\[DifferentialD] \ x\\)\\)\\)\\)\\)\\)\\) = \\!\\(TraditionalForm\\`\\(x\\^2\\/6 - \\(5\\\\ x\\)\ \\/3\\)\\) + k\"\>", StringForm["`1` = `2` + k", analyse`Integrale[ HoldForm[($CellContext`x - 5)/3], $CellContext`x], Rational[-5, 3] $CellContext`x + Rational[1, 6] $CellContext`x^2], Editable->False]}], SequenceForm[10, ") ", StringForm["`1` = `2` + k", analyse`Integrale[ HoldForm[($CellContext`x - 5)/3], $CellContext`x], Rational[-5, 3] $CellContext`x + Rational[1, 6] $CellContext`x^2]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.445409228677409*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"11", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\(\ \[Integral] \\(\\(\\(\\(\\(\\(-2\\)\\)\\\\ x\\)\\) \\(\\(\[DifferentialD] \ x\\)\\)\\)\\)\\)\\)\\) = \\!\\(TraditionalForm\\`\\(-x\\^2\\)\\) + k\"\>", StringForm["`1` = `2` + k", analyse`Integrale[(-2) $CellContext`x, $CellContext`x], \ -$CellContext`x^2], Editable->False]}], SequenceForm[11, ") ", StringForm["`1` = `2` + k", analyse`Integrale[(-2) $CellContext`x, $CellContext`x], \ -$CellContext`x^2]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.445409228709247*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"12", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\(\ \[Integral] \\(\\(\\(\\((4 - \\(\\(3\\\\ x\\)\\))\\)\\) \ \\(\\(\[DifferentialD] x\\)\\)\\)\\)\\)\\)\\) = \ \\!\\(TraditionalForm\\`\\(\\(\\(4\\\\ x\\)\\) - \\(3\\\\ x\\^2\\)\\/2\\)\\) \ + k\"\>", StringForm["`1` = `2` + k", analyse`Integrale[ HoldForm[4 - 3 $CellContext`x], $CellContext`x], 4 $CellContext`x + Rational[-3, 2] $CellContext`x^2], Editable->False]}], SequenceForm[12, ") ", StringForm["`1` = `2` + k", analyse`Integrale[ HoldForm[4 - 3 $CellContext`x], $CellContext`x], 4 $CellContext`x + Rational[-3, 2] $CellContext`x^2]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.445409228741181*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"13", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\(\ \[Integral] \\(\\(\\(\\((x\\^3 + \\(\\(2\\\\ x\\^2\\)\\))\\)\\) \\(\\(\ \[DifferentialD] x\\)\\)\\)\\)\\)\\)\\) = \ \\!\\(TraditionalForm\\`\\(x\\^4\\/4 + \\(2\\\\ x\\^3\\)\\/3\\)\\) + k\"\>", StringForm["`1` = `2` + k", analyse`Integrale[ HoldForm[$CellContext`x^3 + 2 $CellContext`x^2], $CellContext`x], Rational[2, 3] $CellContext`x^3 + Rational[1, 4] $CellContext`x^4], Editable->False]}], SequenceForm[13, ") ", StringForm["`1` = `2` + k", analyse`Integrale[ HoldForm[$CellContext`x^3 + 2 $CellContext`x^2], $CellContext`x], Rational[2, 3] $CellContext`x^3 + Rational[1, 4] $CellContext`x^4]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.44540922877384*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"14", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\(\ \[Integral] \\(\\(\\(\\((x\\^3 - x\\^2 + x - 1)\\)\\) \\(\\(\[DifferentialD] \ x\\)\\)\\)\\)\\)\\)\\) = \\!\\(TraditionalForm\\`\\(x\\^4\\/4 - x\\^3\\/3 + x\ \\^2\\/2 - x\\)\\) + k\"\>", StringForm["`1` = `2` + k", analyse`Integrale[ HoldForm[$CellContext`x^3 - $CellContext`x^2 + $CellContext`x - 1], $CellContext`x], -$CellContext`x + Rational[1, 2] $CellContext`x^2 + Rational[-1, 3] $CellContext`x^3 + Rational[1, 4] $CellContext`x^4], Editable->False]}], SequenceForm[14, ") ", StringForm["`1` = `2` + k", analyse`Integrale[ HoldForm[$CellContext`x^3 - $CellContext`x^2 + $CellContext`x - 1], $CellContext`x], -$CellContext`x + Rational[1, 2] $CellContext`x^2 + Rational[-1, 3] $CellContext`x^3 + Rational[1, 4] $CellContext`x^4]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.445409228793442*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"15", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\(\ \[Integral] \\(\\(\\(\\((\\(\\(-\\(\\(3\\/x\\^2\\)\\)\\)\\) + x + 1)\\)\\) \ \\(\\(\[DifferentialD] x\\)\\)\\)\\)\\)\\)\\) = \ \\!\\(TraditionalForm\\`\\(x\\^2\\/2 + x + 3\\/x\\)\\) + k\"\>", StringForm["`1` = `2` + k", analyse`Integrale[ HoldForm[(-3)/$CellContext`x^2 + $CellContext`x + 1], $CellContext`x], 3/$CellContext`x + $CellContext`x + Rational[1, 2] $CellContext`x^2], Editable->False]}], SequenceForm[15, ") ", StringForm["`1` = `2` + k", analyse`Integrale[ HoldForm[(-3)/$CellContext`x^2 + $CellContext`x + 1], $CellContext`x], 3/$CellContext`x + $CellContext`x + Rational[1, 2] $CellContext`x^2]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.4454092288225203`*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"16", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\(\ \[Integral] \\(\\(\\(\\(1\\/4\\\\ \\(\\((3 - \\(\\(5\\\\ x\\)\\))\\)\\)\\)\\) \ \\(\\(\[DifferentialD] x\\)\\)\\)\\)\\)\\)\\) = \ \\!\\(TraditionalForm\\`\\(\\(3\\\\ x\\)\\/4 - \\(5\\\\ x\\^2\\)\\/8\\)\\) + \ k\"\>", StringForm["`1` = `2` + k", analyse`Integrale[ HoldForm[(3 - 5 $CellContext`x)/4], $CellContext`x], Rational[3, 4] $CellContext`x + Rational[-5, 8] $CellContext`x^2], Editable->False]}], SequenceForm[16, ") ", StringForm["`1` = `2` + k", analyse`Integrale[ HoldForm[(3 - 5 $CellContext`x)/4], $CellContext`x], Rational[3, 4] $CellContext`x + Rational[-5, 8] $CellContext`x^2]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.445409228846792*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"17", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\(\ \[Integral] \\(\\(\\(\\((\\(\\(5\\\\ x\\)\\) + 3 + 5\\/x\\^2)\\)\\) \\(\\(\ \[DifferentialD] x\\)\\)\\)\\)\\)\\)\\) = \\!\\(TraditionalForm\\`\\(\\(5\\\\ \ x\\^2\\)\\/2 + \\(\\(3\\\\ x\\)\\) - 5\\/x\\)\\) + k\"\>", StringForm["`1` = `2` + k", analyse`Integrale[ HoldForm[ 5 $CellContext`x + 3 + 5/$CellContext`x^2], $CellContext`x], (-5)/$CellContext`x + 3 $CellContext`x + Rational[5, 2] $CellContext`x^2], Editable->False]}], SequenceForm[17, ") ", StringForm["`1` = `2` + k", analyse`Integrale[ HoldForm[ 5 $CellContext`x + 3 + 5/$CellContext`x^2], $CellContext`x], (-5)/$CellContext`x + 3 $CellContext`x + Rational[5, 2] $CellContext`x^2]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.445409228872772*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"18", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\(\ \[Integral] \\(\\(\\(\\(3\\\\ \\(\\((x\\^2 + x)\\)\\)\\)\\) \\(\\(\ \[DifferentialD] x\\)\\)\\)\\)\\)\\)\\) = \\!\\(TraditionalForm\\`\\(x\\^3 + \ \\(3\\\\ x\\^2\\)\\/2\\)\\) + k\"\>", StringForm["`1` = `2` + k", analyse`Integrale[ HoldForm[3 ($CellContext`x^2 + $CellContext`x)], $CellContext`x], Rational[3, 2] $CellContext`x^2 + $CellContext`x^3], Editable->False]}], SequenceForm[18, ") ", StringForm["`1` = `2` + k", analyse`Integrale[ HoldForm[3 ($CellContext`x^2 + $CellContext`x)], $CellContext`x], Rational[3, 2] $CellContext`x^2 + $CellContext`x^3]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.445409228894005*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"19", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\(\ \[Integral] \\(\\(\\(\\((x + 2\\/\\@x)\\)\\) \\(\\(\[DifferentialD] \ x\\)\\)\\)\\)\\)\\)\\) = \\!\\(TraditionalForm\\`\\(x\\^2\\/2 + \\(\\(4\\\\ \ \\@x\\)\\)\\)\\) + k\"\>", StringForm["`1` = `2` + k", analyse`Integrale[ HoldForm[$CellContext`x + 2/Sqrt[$CellContext`x]], $CellContext`x], 4 $CellContext`x^Rational[1, 2] + Rational[1, 2] $CellContext`x^2], Editable->False]}], SequenceForm[19, ") ", StringForm["`1` = `2` + k", analyse`Integrale[ HoldForm[$CellContext`x + 2/Sqrt[$CellContext`x]], $CellContext`x], 4 $CellContext`x^Rational[1, 2] + Rational[1, 2] $CellContext`x^2]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.445409228921076*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"20", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\(\ \[Integral] \\(\\(\\(\\(\\(\\((x - 1)\\)\\)\\\\ \\(\\((x + 1)\\)\\)\\)\\) \\(\ \\(\[DifferentialD] x\\)\\)\\)\\)\\)\\)\\) = \\!\\(TraditionalForm\\`\\(x\\^3\ \\/3 - x\\)\\) + k\"\>", StringForm["`1` = `2` + k", analyse`Integrale[ HoldForm[($CellContext`x - 1) ($CellContext`x + 1)], $CellContext`x], -$CellContext`x + Rational[1, 3] $CellContext`x^3], Editable->False]}], SequenceForm[20, ") ", StringForm["`1` = `2` + k", analyse`Integrale[ HoldForm[($CellContext`x - 1) ($CellContext`x + 1)], $CellContext`x], -$CellContext`x + Rational[1, 3] $CellContext`x^3]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.445409228941922*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"21", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\(\ \[Integral] \\(\\(\\(\\((\\(\\(3\\\\ x\\^2\\)\\) + \\(\\(2\\\\ x\\)\\) + \ 2)\\)\\) \\(\\(\[DifferentialD] x\\)\\)\\)\\)\\)\\)\\) = \ \\!\\(TraditionalForm\\`\\(x\\^3 + x\\^2 + \\(\\(2\\\\ x\\)\\)\\)\\) + k\"\>", StringForm["`1` = `2` + k", analyse`Integrale[ HoldForm[3 $CellContext`x^2 + 2 $CellContext`x + 2], $CellContext`x], 2 $CellContext`x + $CellContext`x^2 + $CellContext`x^3], Editable->False]}], SequenceForm[21, ") ", StringForm["`1` = `2` + k", analyse`Integrale[ HoldForm[3 $CellContext`x^2 + 2 $CellContext`x + 2], $CellContext`x], 2 $CellContext`x + $CellContext`x^2 + $CellContext`x^3]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.445409228959944*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"22", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\(\ \[Integral] \\(\\(x\\^9 \\(\\(\[DifferentialD] x\\)\\)\\)\\)\\)\\)\\) = \ \\!\\(TraditionalForm\\`x\\^10\\/10\\) + k\"\>", StringForm["`1` = `2` + k", analyse`Integrale[$CellContext`x^9, $CellContext`x], Rational[1, 10] $CellContext`x^10], Editable->False]}], SequenceForm[22, ") ", StringForm["`1` = `2` + k", analyse`Integrale[$CellContext`x^9, $CellContext`x], Rational[1, 10] $CellContext`x^10]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.44540922897761*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"23", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\(\ \[Integral] \\(\\(1\\/x\\^4 \\(\\(\[DifferentialD] x\\)\\)\\)\\)\\)\\)\\) = \ \\!\\(TraditionalForm\\`\\(-\\(\\(1\\/\\(3\\\\ x\\^3\\)\\)\\)\\)\\) + k\"\>", StringForm["`1` = `2` + k", analyse`Integrale[$CellContext`x^(-4), $CellContext`x], Rational[-1, 3] $CellContext`x^(-3)], Editable->False]}], SequenceForm[23, ") ", StringForm["`1` = `2` + k", analyse`Integrale[$CellContext`x^(-4), $CellContext`x], Rational[-1, 3] $CellContext`x^(-3)]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.445409229002136*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"24", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\(\ \[Integral] \\(\\(5\\/x\\^7 \\(\\(\[DifferentialD] x\\)\\)\\)\\)\\)\\)\\) = \ \\!\\(TraditionalForm\\`\\(-\\(\\(5\\/\\(6\\\\ x\\^6\\)\\)\\)\\)\\) + k\"\>", StringForm["`1` = `2` + k", analyse`Integrale[5 $CellContext`x^(-7), $CellContext`x], Rational[-5, 6] $CellContext`x^(-6)], Editable->False]}], SequenceForm[24, ") ", StringForm["`1` = `2` + k", analyse`Integrale[5 $CellContext`x^(-7), $CellContext`x], Rational[-5, 6] $CellContext`x^(-6)]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.445409229026256*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"25", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\(\ \[Integral] \\(\\(\\(\\((\\(\\(5\\\\ x\\)\\) + 2\\/x\\^2)\\)\\) \\(\\(\ \[DifferentialD] x\\)\\)\\)\\)\\)\\)\\) = \\!\\(TraditionalForm\\`\\(\\(5\\\\ \ x\\^2\\)\\/2 - 2\\/x\\)\\) + k\"\>", StringForm["`1` = `2` + k", analyse`Integrale[ HoldForm[ 5 $CellContext`x + 2/$CellContext`x^2], $CellContext`x], (-2)/$CellContext`x + Rational[5, 2] $CellContext`x^2], Editable->False]}], SequenceForm[25, ") ", StringForm["`1` = `2` + k", analyse`Integrale[ HoldForm[ 5 $CellContext`x + 2/$CellContext`x^2], $CellContext`x], (-2)/$CellContext`x + Rational[5, 2] $CellContext`x^2]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.445409229047103*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"26", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\(\ \[Integral] \\(\\(\\((\\(\\(2\\\\ x\\)\\) - 5)\\)\\^2 \\(\\(\[DifferentialD] \ x\\)\\)\\)\\)\\)\\)\\) = \\!\\(TraditionalForm\\`\\(\\(4\\\\ x\\^3\\)\\/3 - \ \\(\\(10\\\\ x\\^2\\)\\) + \\(\\(25\\\\ x\\)\\)\\)\\) + k\"\>", StringForm["`1` = `2` + k", analyse`Integrale[ HoldForm[(2 $CellContext`x - 5)^2], $CellContext`x], 25 $CellContext`x - 10 $CellContext`x^2 + Rational[4, 3] $CellContext`x^3], Editable->False]}], SequenceForm[26, ") ", StringForm["`1` = `2` + k", analyse`Integrale[ HoldForm[(2 $CellContext`x - 5)^2], $CellContext`x], 25 $CellContext`x - 10 $CellContext`x^2 + Rational[4, 3] $CellContext`x^3]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.44540922909451*^9}], Cell[BoxData[ FormBox[ InterpretationBox[ RowBox[{"27", "\[InvisibleSpace]", "\<\") \"\>", "\[InvisibleSpace]", InterpretationBox["\<\"\\!\\(TraditionalForm\\`\\(TraditionalForm\\`\\(\ \[Integral] \\(\\(\\((\\(\\(3\\\\ x\\)\\) - 2)\\)\\^2\\/x \\(\\(\ \[DifferentialD] x\\)\\)\\)\\)\\)\\)\\) = \\!\\(TraditionalForm\\`\\(\\(9\\\\ \ x\\^2\\)\\/2 - \\(\\(12\\\\ x\\)\\) + \\(\\(4\\\\ \ \\(\\(TraditionalForm\\`\\(ln(\\(\\(\\*TemplateBox[List[\\\"x\\\"], \\\"Abs\\\ \"]\\)\\))\\)\\)\\)\\)\\)\\)\\) + k\"\>", StringForm["`1` = `2` + k", analyse`Integrale[ HoldForm[(3 $CellContext`x - 2)^2/$CellContext`x], $CellContext`x], (-12) $CellContext`x + Rational[9, 2] $CellContext`x^2 + 4 Log[ Abs[$CellContext`x]]], Editable->False]}], SequenceForm[27, ") ", StringForm["`1` = `2` + k", analyse`Integrale[ HoldForm[(3 $CellContext`x - 2)^2/$CellContext`x], $CellContext`x], (-12) $CellContext`x + Rational[9, 2] $CellContext`x^2 + 4 Log[ Abs[$CellContext`x]]]], Editable->False], TraditionalForm]], "Print", CellChangeTimes->{3.445409229123934*^9}] }, Open ]] }, Open ]] }, Open ]] }, Open ]] }, WindowSize->{827, 807}, WindowMargins->{{526, Automatic}, {Automatic, 12}}, DockedCells->(FrontEndExecute[{ FrontEnd`NotebookApply[ FrontEnd`InputNotebook[], #, Placeholder]}]& ), PrintingCopies->1, PrintingPageRange->{1, Automatic}, PrintingOptions->{"PrintCellBrackets"->False, "PrintMultipleHorizontalPages"->False, "PrintRegistrationMarks"->True, "PrintingMargins"->{{24.9987404283, 24.9987404283}, {22.677165600000002`, \ 24.9987404283}}}, CellLabelAutoDelete->True, FrontEndVersion->"7.0 for Mac OS X x86 (32-bit) (February 18, 2009)", StyleDefinitions->"stylemath.nb" ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{} *) (*CellTagsIndex CellTagsIndex->{} *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[567, 22, 243, 5, 44, "Section"], Cell[CellGroupData[{ Cell[835, 31, 8717, 297, 19, "Input", CellOpen->False], Cell[CellGroupData[{ Cell[9577, 332, 686, 18, 42, "Print"], Cell[10266, 352, 699, 18, 42, "Print"], Cell[10968, 372, 730, 19, 42, "Print"], Cell[11701, 393, 791, 21, 42, "Print"], Cell[12495, 416, 913, 25, 42, "Print"], Cell[13411, 443, 846, 24, 42, "Print"], Cell[14260, 469, 853, 24, 42, "Print"], Cell[15116, 495, 815, 23, 47, "Print"], Cell[15934, 520, 763, 20, 42, "Print"], Cell[16700, 542, 820, 23, 44, "Print"], Cell[17523, 567, 762, 20, 42, "Print"], Cell[18288, 589, 855, 24, 42, "Print"], Cell[19146, 615, 939, 26, 42, "Print"], Cell[20088, 643, 950, 26, 42, "Print"], Cell[21041, 671, 945, 26, 46, "Print"], Cell[21989, 699, 918, 26, 44, "Print"], Cell[22910, 727, 950, 26, 46, "Print"], Cell[23863, 755, 905, 25, 42, "Print"], Cell[24771, 782, 892, 25, 48, "Print"], Cell[25666, 809, 936, 26, 42, "Print"] }, Open ]] }, Open ]], Cell[26629, 839, 44, 1, 4, "PageBreak", PageBreakBelow->True], Cell[CellGroupData[{ Cell[26698, 844, 950, 26, 42, "Print"], Cell[27651, 872, 733, 19, 42, "Print"], Cell[28387, 893, 766, 20, 46, "Print"], Cell[29156, 915, 765, 20, 46, "Print"], Cell[29924, 937, 934, 26, 46, "Print"], Cell[30861, 965, 890, 25, 42, "Print"], Cell[31754, 992, 937, 26, 48, "Print"] }, Open ]], Cell[CellGroupData[{ Cell[32728, 1023, 31, 0, 39, "Subsection"], Cell[CellGroupData[{ Cell[32784, 1027, 623, 14, 19, "Input", CellOpen->False], Cell[CellGroupData[{ Cell[33432, 1045, 652, 14, 42, "Print"], Cell[34087, 1061, 713, 16, 47, "Print"], Cell[34803, 1079, 749, 16, 47, "Print"], Cell[35555, 1097, 799, 17, 47, "Print"], Cell[36357, 1116, 984, 20, 47, "Print"], Cell[37344, 1138, 834, 19, 47, "Print"], Cell[38181, 1159, 858, 19, 47, "Print"], Cell[39042, 1180, 768, 18, 47, "Print"], Cell[39813, 1200, 761, 17, 47, "Print"], Cell[40577, 1219, 876, 19, 47, "Print"], Cell[41456, 1240, 724, 16, 42, "Print"], Cell[42183, 1258, 884, 20, 47, "Print"], Cell[43070, 1280, 941, 19, 47, "Print"], Cell[44014, 1301, 1104, 22, 47, "Print"], Cell[45121, 1325, 957, 19, 49, "Print"], Cell[46081, 1346, 938, 20, 47, "Print"], Cell[47022, 1368, 1018, 23, 49, "Print"], Cell[48043, 1393, 904, 19, 47, "Print"], Cell[48950, 1414, 928, 19, 51, "Print"], Cell[49881, 1435, 927, 21, 47, "Print"], Cell[50811, 1458, 954, 20, 42, "Print"], Cell[51768, 1480, 730, 16, 47, "Print"], Cell[52501, 1498, 774, 16, 46, "Print"], Cell[53278, 1516, 778, 16, 46, "Print"], Cell[54059, 1534, 946, 23, 49, "Print"], Cell[55008, 1559, 959, 19, 47, "Print"], Cell[55970, 1580, 1148, 25, 48, "Print"] }, Open ]] }, Open ]] }, Open ]] }, Open ]] } ] *) (* End of internal cache information *)