(* Content-type: application/vnd.wolfram.mathematica *) (*** Wolfram Notebook File ***) (* http://www.wolfram.com/nb *) (* CreatedBy='Mathematica 9.0' *) (*CacheID: 234*) (* Internal cache information: NotebookFileLineBreakTest NotebookFileLineBreakTest NotebookDataPosition[ 157, 7] NotebookDataLength[ 109869, 2698] NotebookOptionsPosition[ 66087, 1749] NotebookOutlinePosition[ 93776, 2337] CellTagsIndexPosition[ 93159, 2317] WindowFrame->Normal*) (* Beginning of Notebook Content *) Notebook[{ Cell[CellGroupData[{ Cell[TextData[StyleBox["Cvi\[CHacek]en\[IAcute]", "Section"]], "Subsection", CellChangeTimes->{{3.570788455015625*^9, 3.5707884974375*^9}, { 3.570788540859375*^9, 3.570788566484375*^9}, 3.570788683921875*^9, { 3.5707887146875*^9, 3.57078872703125*^9}}], Cell[CellGroupData[{ Cell[TextData[StyleBox["Tvorba a pou\[ZHacek]it\[IAcute] funkc\[IAcute]", \ "Subsection"]], "Subsection", CellGroupingRules->{GroupTogetherGrouping, 10000.}, CellChangeTimes->{{3.570788814875*^9, 3.570788820328125*^9}, 3.570789113*^9, 3.570790108578125*^9, 3.5707902158125*^9, 3.5707908943125*^9, { 3.5707910805*^9, 3.57079109875*^9}}], Cell[TextData[{ "Definujte funkci ", Cell[BoxData[ RowBox[{"f", "[", "x", "]"}]]], " vracej\[IAcute]c\[IAcute] ", Cell[BoxData[ RowBox[{"x", " ", RowBox[{"Sin", "[", "x", "]"}]}]]], ". Vyhodno\[THacek]te tuto funkci ", Cell[BoxData[ RowBox[{"f", "[", "x", "]"}]]], " pro r\[URing]zn\[EAcute] hodnoty ", StyleBox["x", "MR"], " a zkontrolujte, zda definice funkce funguje." }], "Text", CellGroupingRules->{GroupTogetherGrouping, 10000.}, CellChangeTimes->{{3.56984885509375*^9, 3.569848920515625*^9}, { 3.5707890856875*^9, 3.570789113*^9}, 3.570790108578125*^9, 3.570790215828125*^9}, CellTags->{"Exercises", "Creating Definitions"}], Cell[BoxData[""], "Text", CellGroupingRules->{GroupTogetherGrouping, 10000.}, CellChangeTimes->{ 3.569848828546875*^9, {3.569848922375*^9, 3.5698489236875*^9}, { 3.5707890856875*^9, 3.570789113*^9}, 3.570790108578125*^9, 3.570790215828125*^9}], Cell[TextData[{ "Nakresli ", Cell[BoxData[ RowBox[{"f", "[", StyleBox["\[Theta]", "TR"], "]"}]]], " pro ", StyleBox["\[Theta]", "RM"], " mezi ", Cell[BoxData[ FormBox[ RowBox[{"-", "10"}], TraditionalForm]]], " a 10. Projev\[IAcute] se chov\[AAcute]n\[IAcute] funkce rozd\[IAcute]ln\ \[EHacek], pokud je hodnota na kreslen\[IAcute] ", StyleBox["\[Theta]", "RM"], " a ne ", StyleBox["x", "MR"], "?" }], "Text", CellGroupingRules->{GroupTogetherGrouping, 10000.}, CellChangeTimes->{{3.56984893225*^9, 3.569849000609375*^9}, { 3.5707890856875*^9, 3.570789113*^9}, 3.570790108578125*^9, 3.570790215828125*^9}, CellTags->{"Exercises", "Creating Definitions"}], Cell["", "Text", CellGroupingRules->{GroupTogetherGrouping, 10000.}, CellChangeTimes->{{3.56984900359375*^9, 3.56984900590625*^9}, { 3.5707890856875*^9, 3.570789113*^9}, 3.570790108578125*^9, 3.570790215828125*^9}], Cell[TextData[{ "P\[RHacek]ed dal\[SHacek]\[IAcute]mi v\[YAcute]po\[CAcute]ty vyma\[ZHacek] \ definici ", StyleBox["f.\n", "MR"] }], "Text", CellGroupingRules->{GroupTogetherGrouping, 10000.}, CellChangeTimes->{{3.56984901046875*^9, 3.569849051421875*^9}, { 3.5707890856875*^9, 3.570789113*^9}, 3.570790108578125*^9, 3.570790215828125*^9, {3.57079090865625*^9, 3.570790918578125*^9}}, CellTags->{"Exercises", "Creating Definitions"}] }, Open ]], Cell[CellGroupData[{ Cell[TextData[StyleBox["\tTvorba seznam\[URing] pomoc\[IAcute] Table", \ "Subsection"]], "ExerciseHeading", CellGroupingRules->{GroupTogetherGrouping, 10001.}, CellChangeTimes->{{3.493562530291525*^9, 3.493562530479971*^9}, { 3.569849090265625*^9, 3.56984913540625*^9}, {3.57078861746875*^9, 3.570788618234375*^9}, 3.57078913728125*^9, {3.570789633890625*^9, 3.570789634734375*^9}, {3.57078992871875*^9, 3.570789929875*^9}, { 3.570790108578125*^9, 3.57079013065625*^9}, 3.570790230171875*^9, { 3.57079026184375*^9, 3.5707903175625*^9}, {3.570790369296875*^9, 3.570790423859375*^9}, {3.570790577484375*^9, 3.570790582046875*^9}}, CellTags->{"Exercises", "Table I"}], Cell[TextData[{ "Obvykle cvi\[CHacek]en\[IAcute] ve cvi\[CHacek]ebnic\[IAcute]ch programov\ \[AAcute]n\[IAcute] je konstrukce seznamu (tabulek) integer \ \[CHacek]\[IAcute]sel a jejich druh\[YAcute]ch mocnin. V ", StyleBox["Mathematica ", FontSlant->"Italic"], "existuje cel\[AAcute] \[RHacek]ada mo\[ZHacek]n\[YAcute]ch postup\[URing]. \ Jednou z mo\[ZHacek]nost\[IAcute] je pou\[ZHacek]it\[IAcute] funkce ", Cell[BoxData[ ButtonBox["Do", BaseStyle->"Link", ButtonData->"paclet:ref/Do"]], "InlineFormula"], ", funkce ", Cell[BoxData[ ButtonBox["Print", BaseStyle->"Link", ButtonData->"paclet:ref/Print"]], "InlineFormula"], " a \[RHacek]et\[EHacek]zc\[URing] mezer, \ odd\[EAcute]luj\[IAcute]c\[IAcute]ch sloupce v tabulce." }], "Text", CellGroupingRules->{GroupTogetherGrouping, 10001.}, CellChangeTimes->{{3.569849140109375*^9, 3.569849277046875*^9}, 3.57078913728125*^9, 3.570790108578125*^9, 3.570790230171875*^9}, CellTags->{"Exercises", "Table I"}], Cell[TextData[StyleBox["\tVyhodno\[THacek]te n\[AAcute]sleduj\[IAcute]c\ \[IAcute] v\[YAcute]raz ", "Text"]], "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10001.}, CellChangeTimes->{{3.56984928721875*^9, 3.5698493161875*^9}, 3.57078913728125*^9, 3.570790108578125*^9, 3.570790230171875*^9, { 3.571476297296875*^9, 3.571476297703125*^9}}, CellTags->{"Exercises", "Table I"}], Cell[BoxData[ RowBox[{"Do", "[", RowBox[{ RowBox[{"Print", "[", RowBox[{"i", ",", "\"\< \>\"", ",", RowBox[{"i", "^", "2"}]}], "]"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "10"}], "}"}]}], "]"}]], "Input", CellGroupingRules->{GroupTogetherGrouping, 10001.}, CellChangeTimes->{3.57078913728125*^9, 3.570790108578125*^9, 3.570790230171875*^9}, CellTags->{"Exercises", "Table I"}], Cell[TextData[StyleBox["\tUpravte program tak, aby jste p\[RHacek]idali t\ \[RHacek]et\[IAcute] sloupec, kter\[YAcute] bude obsahovat t\[RHacek]et\ \[IAcute] mocniny integer \[CAcute]\[IAcute]sel", "Text"]], "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10001.}, CellChangeTimes->{{3.56984933403125*^9, 3.56984937903125*^9}, 3.57078913728125*^9, 3.570790108578125*^9, 3.570790230171875*^9, { 3.571476301078125*^9, 3.5714763014375*^9}}, CellTags->{"Exercises", "Table I"}], Cell["", "NonPrintButton", CellGroupingRules->{GroupTogetherGrouping, 10001.}, CellChangeTimes->{3.56984938596875*^9, 3.570790230171875*^9}] }, Open ]], Cell[CellGroupData[{ Cell[TextData[StyleBox["\tTabulky a gridy", "Subsection"]], "ExerciseHeading", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellChangeTimes->{{3.56984940290625*^9, 3.569849413328125*^9}, 3.5707891915*^9, 3.570790171890625*^9, {3.57079032271875*^9, 3.570790324625*^9}, 3.570790619859375*^9}, CellTags->{"Exercises", "Table II"}], Cell[TextData[{ "Jedn\[IAcute]m z probl\[EAcute]m\[URing] v\[YAcute]sledku p\[RHacek]edchoz\ \[IAcute]ho cvi\[CHacek]en\[IAcute] je, \[ZHacek]e sloupce nejsou \ spr\[AAcute]vn\[EHacek] zarovn\[AAcute]ny. \[CapitalRHacek]e\[SHacek]en\ \[IAcute]m je konstrukce tabulky a n\[AAcute]sledn\[EAcute] zarovn\[AAcute]n\ \[IAcute] pomoc\[IAcute] funkce ", Cell[BoxData[ ButtonBox["TableForm", BaseStyle->"Link", ButtonData->"paclet:ref/TableForm"]], "InlineFormula"], "." }], "Text", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellChangeTimes->{{3.569849429625*^9, 3.569849528890625*^9}, 3.5707891915*^9, 3.570790171890625*^9, 3.570790619859375*^9}, CellTags->{"Exercises", "Table II"}], Cell[TextData[StyleBox["\tVyhodno\[THacek]te n\[AAcute]sleduj\[IAcute]c\ \[IAcute] v\[YAcute]raz a vytvo\[RHacek]te tabulku.", "Text"]], "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellChangeTimes->{{3.569849539484375*^9, 3.56984955890625*^9}, { 3.56984960253125*^9, 3.569849617609375*^9}, 3.5707891915*^9, 3.570790171890625*^9, 3.570790619859375*^9, {3.571476307265625*^9, 3.571476307578125*^9}}, CellTags->{"Exercises", "Table II"}], Cell[BoxData[ RowBox[{"mat", "=", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{"i", ",", RowBox[{"i", "^", "2"}]}], "}"}], ",", RowBox[{"{", RowBox[{"i", ",", "1", ",", "10"}], "}"}]}], "]"}]}]], "Input", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellChangeTimes->{3.570789191515625*^9, 3.570790171890625*^9, 3.570790619859375*^9}, CellTags->{"Exercises", "Table II"}], Cell["\<\ N\[AAcute]sleduj\[IAcute]c\[IAcute] p\[RHacek]\[IAcute]kaz zformatuje vytvo\ \[RHacek]enou tabulku do po\[ZHacek]adovan\[EAcute]ho form\[AAcute]tu.\ \>", "Text", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellChangeTimes->{{3.569849633484375*^9, 3.569849668703125*^9}, 3.570789191515625*^9, 3.570790171890625*^9, 3.570790619859375*^9}, CellTags->{"Exercises", "Table II"}], Cell[BoxData[ RowBox[{"TableForm", "[", "mat", "]"}]], "Input", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellChangeTimes->{3.570789191515625*^9, 3.570790171890625*^9, 3.570790619859375*^9}, CellTags->{"Exercises", "Table II"}], Cell[TextData[{ "Zarovn\[AAcute]n\[IAcute] dat v tabulce je mo\[ZHacek]n\[EAcute] \[RHacek]\ \[IAcute]dit pomoc\[IAcute] r\[URing]zn\[YAcute]ch parametr\[URing] funkce ", Cell[BoxData[ ButtonBox["Grid", BaseStyle->"Link", ButtonData->"paclet:ref/Grid"]], "InlineFormula"], "." }], "Text", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellChangeTimes->{{3.569849684890625*^9, 3.569849720375*^9}, 3.570789191515625*^9, 3.570790171890625*^9, 3.570790619875*^9}, CellTags->{"Exercises", "Table II"}], Cell[BoxData[ RowBox[{"Grid", "[", RowBox[{"mat", ",", RowBox[{"Alignment", "\[Rule]", "Right"}]}], "]"}]], "Input", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellChangeTimes->{3.570789191515625*^9, 3.570790171890625*^9, 3.570790619875*^9}, CellTags->{"Exercises", "Table II"}], Cell[TextData[StyleBox["\tUpravte tento program tak, aby jste p\[RHacek]idali \ dal\[SHacek]\[IAcute] sloupec, obsahuj\[IAcute]c\[IAcute] t\[RHacek]et\ \[IAcute] mocninu ka\[ZHacek]d\[EAcute]ho \[CHacek]\[IAcute]sla. ", "Text"]], \ "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellChangeTimes->{{3.569849759390625*^9, 3.569849810265625*^9}, 3.570789191515625*^9, 3.570790171890625*^9, 3.570790619875*^9, { 3.5714763128125*^9, 3.57147631309375*^9}}, CellTags->{"Exercises", "Table II"}], Cell["", "NonPrintButton", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellChangeTimes->{3.5698498125*^9, 3.570789191515625*^9, 3.570790171890625*^9, 3.570790619875*^9}], Cell[TextData[StyleBox["\tPou\[ZHacek]ijte substitu\[CHacek]n\[IAcute] \ pravidlo tak, aby jste upravili posledn\[IAcute] v\[YAcute]sledek \ p\[RHacek]id\[AAcute]n\[IAcute]m \[CHacek]tvrt\[EAcute]ho sloupce, kter\ \[YAcute] obsahuje sou\[CHacek]et druh\[EAcute] a t\[RHacek]et\[IAcute] \ mocniny v ka\[ZHacek]d\[EAcute] \[RHacek]\[AAcute]dce. ", "Text"]], "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellChangeTimes->{{3.569849823078125*^9, 3.5698498366875*^9}, { 3.56984997278125*^9, 3.569849979859375*^9}, {3.56985001190625*^9, 3.5698500135625*^9}, {3.569850302109375*^9, 3.569850361703125*^9}, 3.570789191515625*^9, 3.570790171890625*^9, 3.570790619875*^9, { 3.57147631590625*^9, 3.57147631965625*^9}}, CellTags->{"Exercises", "Table II"}], Cell["", "NonPrintButton", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellChangeTimes->{3.569850367609375*^9, 3.570789191515625*^9, 3.570790171890625*^9, 3.570790619875*^9}] }, Open ]], Cell[CellGroupData[{ Cell[TextData[StyleBox["\tOperace s maticemi", "Subsection"]], \ "ExerciseHeading", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellChangeTimes->{{3.569850383109375*^9, 3.569850392828125*^9}, 3.570789206421875*^9, 3.570790171890625*^9, 3.5707906308125*^9}, CellTags->{"Exercises", "Matrix Operations"}], Cell[TextData[{ "P\[RHacek]\[IAcute]kaz vytvo\[RHacek]\[IAcute] matici ", Cell[BoxData[ FormBox[ RowBox[{"6", "\[Cross]", "6"}], TraditionalForm]]], " se symbolick\[YAcute]mi prvky." }], "Text", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellChangeTimes->{{3.569850559484375*^9, 3.569850583625*^9}, 3.570789206421875*^9, 3.570790171890625*^9, 3.5707906308125*^9}, CellTags->{"Exercises", "Matrix Operations"}], Cell[BoxData[ RowBox[{"mat", "=", RowBox[{"Array", "[", RowBox[{"m", ",", RowBox[{"{", RowBox[{"6", ",", "6"}], "}"}]}], "]"}]}]], "Input", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellChangeTimes->{3.570789206421875*^9, 3.570790171890625*^9, 3.5707906308125*^9}, CellTags->{"Exercises", "Matrix Operations"}], Cell[TextData[{ "M\[URing]\[ZHacek]eme matici zobrazit v tradi\[CHacek]n\[IAcute] form\ \[EHacek] pou\[ZHacek]it\[IAcute]m funkce ", Cell[BoxData[ ButtonBox["MatrixForm", BaseStyle->"Link", ButtonData->"paclet:ref/MatrixForm"]], "InlineFormula"], "." }], "Text", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellChangeTimes->{{3.569850588234375*^9, 3.569850615765625*^9}, 3.570789206421875*^9, 3.570790171890625*^9, 3.5707906308125*^9}, CellTags->{"Exercises", "Matrix Operations"}], Cell[BoxData[ RowBox[{"MatrixForm", "[", "mat", "]"}]], "Input", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellChangeTimes->{3.570789206421875*^9, 3.570790171890625*^9, 3.5707906308125*^9}, CellTags->{"Exercises", "Matrix Operations"}], Cell[TextData[{ StyleBox["\tPou\[ZHacek]ijte funkci ", "Text"], StyleBox[Cell[BoxData[ ButtonBox["Part", BaseStyle->"Link", ButtonData->"paclet:ref/Part"]], "Text"], "Text"], ", ", StyleBox["aby jste z\[IAcute]skali p\[AAcute]t\[YAcute] \ \[RHacek]\[AAcute]dek matice.", "Text"], " " }], "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellChangeTimes->{{3.569850635890625*^9, 3.569850669734375*^9}, 3.570789206421875*^9, 3.570790171890625*^9, 3.5707906308125*^9, { 3.57147632721875*^9, 3.57147632753125*^9}}, CellTags->{"Exercises", "Matrix Operations"}], Cell[BoxData[""], "NonPrintButton", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellChangeTimes->{3.569850673203125*^9, 3.570789206421875*^9, 3.570790171890625*^9, 3.5707906308125*^9}], Cell[TextData[{ StyleBox["\tPou\[ZHacek]ijte funkci ", "Text"], StyleBox[Cell[BoxData[ ButtonBox["Part", BaseStyle->"Link", ButtonData->"paclet:ref/Part"]], "Text"], "Text"], StyleBox[", aby jste z\[IAcute]skali", "Text"], " ", StyleBox["t\[RHacek]et\[IAcute] sloupec matice", "Text"] }], "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellChangeTimes->{{3.569850690703125*^9, 3.569850730828125*^9}, 3.570789206421875*^9, 3.570790171890625*^9, 3.5707906308125*^9, { 3.57147632996875*^9, 3.5714763301875*^9}}, CellTags->{"Exercises", "Matrix Operations"}], Cell[BoxData[""], "NonPrintButton", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellChangeTimes->{3.569850735359375*^9, 3.570789206421875*^9, 3.570790171890625*^9, 3.5707906308125*^9}], Cell[TextData[{ StyleBox["\tPou\[ZHacek]ijte funkci ", "Text"], StyleBox[Cell[BoxData[ ButtonBox["Diagonal", BaseStyle->"Link", ButtonData->"paclet:ref/Diagonal"]], "Text"], "Text"], " , ", StyleBox["aby jste z\[IAcute]skali hlavn\[IAcute] diagon\[AAcute]lu matice.", "Text"] }], "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellChangeTimes->{{3.5698508086875*^9, 3.569850869890625*^9}, 3.570789206421875*^9, 3.57079017190625*^9, 3.5707906308125*^9, { 3.57147633246875*^9, 3.5714763326875*^9}}, CellTags->{"Exercises", "Matrix Operations"}], Cell[BoxData[""], "NonPrintButton", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellChangeTimes->{3.569850879546875*^9, 3.570789206421875*^9, 3.57079017190625*^9, 3.5707906308125*^9}], Cell[TextData[{ StyleBox["\tPou\[ZHacek]ij ", "Text"], StyleBox[Cell[BoxData[ ButtonBox["Diagonal", BaseStyle->"Link", ButtonData->"paclet:ref/Diagonal"]], "Text"], "Text"], " ", StyleBox["s druh\[YAcute]m argumentem tak, aby jste z\[IAcute]skali t\ \[RHacek]et\[IAcute] diagon\[AAcute]lu pod hlavn\[IAcute] \ diagon\[AAcute]lou.", "Text"] }], "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellChangeTimes->{{3.56985097084375*^9, 3.569851031109375*^9}, { 3.569851076765625*^9, 3.56985108675*^9}, 3.570789206421875*^9, 3.57079017190625*^9, 3.5707906308125*^9, {3.571476335234375*^9, 3.57147633546875*^9}}, CellTags->{"Exercises", "Matrix Operations"}], Cell[BoxData[""], "NonPrintButton", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellChangeTimes->{3.569851105234375*^9, 3.570789206421875*^9, 3.57079017190625*^9, 3.5707906308125*^9}], Cell[TextData[{ StyleBox["\tPou\[ZHacek]ijte ", "Text"], StyleBox[Cell[BoxData[ ButtonBox["Diagonal", BaseStyle->"Link", ButtonData->"paclet:ref/Diagonal"]], "Text"], "Text"], StyleBox[" (a dal\[SHacek]\[IAcute] funkce), aby jste z\[IAcute]skali diagon\ \[AAcute]lu z prav\[EAcute]ho horn\[IAcute]ho rohu do lev\[EAcute]ho doln\ \[IAcute]ho rohu.", "Text"] }], "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellChangeTimes->{{3.569851115828125*^9, 3.569851176875*^9}, 3.570789206421875*^9, 3.57079017190625*^9, 3.5707906308125*^9, { 3.5714763376875*^9, 3.571476337921875*^9}}, CellTags->{"Exercises", "Matrix Operations"}], Cell[BoxData[""], "NonPrintButton", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellChangeTimes->{3.5698511804375*^9, 3.570789206421875*^9, 3.57079017190625*^9, 3.5707906308125*^9}] }, Open ]], Cell[CellGroupData[{ Cell[TextData[StyleBox["\tUr\[CHacek]en\[IAcute] \ \[CHacek]\[AAcute]st\[IAcute] matice", "Subsection"]], "ExerciseHeading", CellGroupingRules->{GroupTogetherGrouping, 10004.}, CellChangeTimes->{{3.56985119384375*^9, 3.5698512160625*^9}, { 3.570789222703125*^9, 3.57078924265625*^9}, 3.57079017190625*^9, 3.570790647046875*^9}, CellTags->{"Exercises", "Picking Parts"}], Cell["\<\ Vyhodno\[THacek]te n\[AAcute]sleduj\[IAcute]c\[IAcute] vstup a zkonstruujte \ pole integer \[CHacek]\[IAcute]sel a zobrazte je jako \ tradi\[CAcute]n\[IAcute] matici.\ \>", "Text", CellGroupingRules->{GroupTogetherGrouping, 10004.}, CellChangeTimes->{{3.5698512211875*^9, 3.56985126534375*^9}, { 3.570789222703125*^9, 3.57078924265625*^9}, 3.57079017190625*^9, 3.570790647046875*^9}, CellTags->{"Exercises", "Picking Parts"}], Cell[BoxData[{ RowBox[{ RowBox[{"SeedRandom", "[", "123", "]"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"mat", "=", RowBox[{"RandomInteger", "[", RowBox[{ RowBox[{"{", RowBox[{"1", ",", "9"}], "}"}], ",", RowBox[{"{", RowBox[{"6", ",", "6"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{"MatrixForm", "[", "mat", "]"}]}], "Input", CellGroupingRules->{GroupTogetherGrouping, 10004.}, CellChangeTimes->{{3.570789222703125*^9, 3.57078924265625*^9}, 3.57079017190625*^9, 3.570790647046875*^9}], Cell[TextData[{ "\nZopakujme si, \[ZHacek]e ", Cell[BoxData[ RowBox[{"mat", "[", RowBox[{"[", "k", "]"}], "]"}]]], " vrac\[IAcute] k-t\[YAcute] \[RHacek]\[AAcute]dek a ", Cell[BoxData[ RowBox[{"mat", "[", RowBox[{"[", RowBox[{"All", ",", "k"}], "]"}], "]"}]]], " vrac\[IAcute] k-t\[YAcute] sloupec matice. (V\[IAcute]ce p\[RHacek]\ \[IAcute]klad\[URing] a dokumentace k funkci ", Cell[BoxData[ ButtonBox["Part", BaseStyle->"Link", ButtonData->"paclet:ref/Part"]], "InlineFormula"], " najdeme v Documentation Center.) Nap\[RHacek]\[IAcute]klad vyhodnocen\ \[IAcute]m n\[AAcute]sleduj\[IAcute]c\[IAcute]ho vstupu \ z\[IAcute]sk\[AAcute]te druh\[YAcute] sloupec matice ", StyleBox["mat", "MR"], "." }], "Text", CellGroupingRules->{GroupTogetherGrouping, 10004.}, CellChangeTimes->{{3.56985127609375*^9, 3.569851398078125*^9}, { 3.57078922271875*^9, 3.57078924265625*^9}, 3.57079017190625*^9, 3.5707906470625*^9}, CellTags->{"Exercises", "Picking Parts"}], Cell[BoxData[ RowBox[{"mat", "[", RowBox[{"[", RowBox[{"All", ",", "2"}], "]"}], "]"}]], "Input", CellGroupingRules->{GroupTogetherGrouping, 10004.}, CellChangeTimes->{{3.57078922271875*^9, 3.57078924265625*^9}, 3.57079017190625*^9, 3.5707906470625*^9}, CellTags->{"Exercises", "Picking Parts"}], Cell[BoxData[ RowBox[{ RowBox[{"mat", "[", RowBox[{"[", RowBox[{"All", ",", "2"}], "]"}], "]"}], "//", "MatrixForm"}]], "Input", CellGroupingRules->{GroupTogetherGrouping, 10004.}, CellChangeTimes->{{3.57078922271875*^9, 3.57078924265625*^9}, 3.57079017190625*^9, 3.5707906470625*^9}, CellTags->{"Exercises", "Picking Parts"}], Cell[TextData[{ "\[CapitalCHacek]asto je u\[ZHacek]ite\[CHacek]n\[EAcute] z\[IAcute]skat n\ \[EHacek]kolik prvk\[URing] ze seznamu nebo n\[EHacek]kolik \ \[RHacek]\[AAcute]dek \[CHacek]i sloupc\[URing] z matice. Toto je \ mo\[ZHacek]n\[EAcute] realizovat v\[YAcute]pisem pozic jednotliv\[YAcute]ch \ po\[ZHacek]adovan\[YAcute]ch prvk\[URing]. Nap\[RHacek]\[IAcute]klad vyhodno\ \[THacek]te n\[AAcute]sleduj\[IAcute]c\[IAcute] vstup k \ z\[IAcute]sk\[AAcute]n\[IAcute] seznamu obsahuj\[IAcute]c\[IAcute]ho prvn\ \[IAcute] a druh\[YAcute] \[RHacek]\[AAcute]dek z matice ", StyleBox["mat", "MR"], "." }], "Text", CellGroupingRules->{GroupTogetherGrouping, 10004.}, CellChangeTimes->{{3.569851416546875*^9, 3.56985159890625*^9}, { 3.57078922271875*^9, 3.57078924265625*^9}, 3.57079017190625*^9, 3.5707906470625*^9}, CellTags->{"Exercises", "Picking Parts"}], Cell[BoxData[ RowBox[{"mat", "[", RowBox[{"[", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}], "]"}], "]"}]], "Input", CellGroupingRules->{GroupTogetherGrouping, 10004.}, CellChangeTimes->{{3.57078922271875*^9, 3.57078924265625*^9}, 3.57079017190625*^9, 3.5707906470625*^9}, CellTags->{"Exercises", "Picking Parts"}], Cell[TextData[{ "Vyhodno\[THacek]te n\[AAcute]sleduj\[IAcute]c\[IAcute] vstup, aby jsme obdr\ \[ZHacek]eli seznam, obsahuj\[IAcute]c\[IAcute] prvn\[IAcute] a druh\[YAcute] \ sloupec z matice ", StyleBox["mat", "MR"], "." }], "Text", CellGroupingRules->{GroupTogetherGrouping, 10004.}, CellChangeTimes->{{3.569851609234375*^9, 3.5698516665*^9}, { 3.57078922271875*^9, 3.57078924265625*^9}, 3.57079017190625*^9, 3.5707906470625*^9}, CellTags->{"Exercises", "Picking Parts"}], Cell[BoxData[ RowBox[{ RowBox[{"mat", "[", RowBox[{"[", RowBox[{"All", ",", RowBox[{"{", RowBox[{"1", ",", "2"}], "}"}]}], "]"}], "]"}], "//", "MatrixForm"}]], "Input", CellGroupingRules->{GroupTogetherGrouping, 10004.}, CellChangeTimes->{{3.57078922271875*^9, 3.570789242671875*^9}, 3.57079017190625*^9, 3.5707906470625*^9}, CellTags->{"Exercises", "Picking Parts"}], Cell[TextData[StyleBox["\tPo\[CHacek]\[IAcute]naje prvn\[IAcute]m sloupcem \ vra\[THacek]te ka\[ZHacek]d\[YAcute] lich\[YAcute] (druh\[YAcute]) sloupec v \ matici. ", "Text"]], "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10004.}, CellChangeTimes->{{3.569851676125*^9, 3.56985172871875*^9}, { 3.57078922271875*^9, 3.570789242671875*^9}, 3.57079017190625*^9, 3.5707906470625*^9, {3.570967027421875*^9, 3.570967039421875*^9}, { 3.570967731765625*^9, 3.57096773515625*^9}, {3.57147634478125*^9, 3.571476345046875*^9}}, CellTags->{"Exercises", "Picking Parts"}], Cell[BoxData[""], "NonPrintButton", CellGroupingRules->{GroupTogetherGrouping, 10004.}, CellChangeTimes->{ 3.569851685609375*^9, {3.57078922271875*^9, 3.570789242671875*^9}, 3.57079017190625*^9, 3.5707906470625*^9}], Cell[TextData[StyleBox["\tP\[RHacek]i\[RHacek]a\[DHacek] hodnotu 0 \ ka\[ZHacek]d\[EAcute]mu prvku v posledn\[IAcute]m sloupci matice.", "Text"]], \ "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10004.}, CellChangeTimes->{{3.569851739765625*^9, 3.569851774734375*^9}, { 3.57078922271875*^9, 3.570789242671875*^9}, 3.57079017190625*^9, 3.5707906470625*^9, {3.571476347515625*^9, 3.571476347703125*^9}}, CellTags->{"Exercises", "Picking Parts"}], Cell[BoxData[""], "NonPrintButton", CellGroupingRules->{GroupTogetherGrouping, 10004.}, CellChangeTimes->{ 3.569851777515625*^9, {3.57078922271875*^9, 3.570789242671875*^9}, 3.57079017190625*^9, 3.5707906470625*^9}], Cell[TextData[StyleBox["\tP\[RHacek]i\[RHacek]a\[DHacek] hodnotu 0 \ ka\[ZHacek]d\[EAcute]mu prvku na \[OpenCurlyDoubleQuote]hranici\ \[CloseCurlyDoubleQuote] matice tj. prvk\[URing]m v prvn\[IAcute]m a posledn\ \[IAcute]m \[RHacek]\[AAcute]dku a v prvn\[IAcute]m a posledn\[IAcute]m \ sloupci.", "Text"]], "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10004.}, CellChangeTimes->{{3.5698517865625*^9, 3.569851855734375*^9}, { 3.57078922271875*^9, 3.570789242671875*^9}, 3.57079017190625*^9, 3.5707906470625*^9, {3.57147635065625*^9, 3.571476350890625*^9}}, CellTags->{"Exercises", "Picking Parts"}], Cell[BoxData[""], "NonPrintButton", CellGroupingRules->{GroupTogetherGrouping, 10004.}, CellChangeTimes->{3.56985185921875*^9, 3.5707906470625*^9}] }, Open ]], Cell[CellGroupData[{ Cell[TextData[StyleBox["\tOkam\[ZHacek]it\[EAcute] a odlo\[ZHacek]en\[EAcute] \ p\[RHacek]i\[RHacek]azen\[IAcute]", "Subsection"]], "ExerciseHeading", CellGroupingRules->{GroupTogetherGrouping, 10005.}, CellChangeTimes->{{3.569851872875*^9, 3.569851892703125*^9}, 3.570789255734375*^9, 3.57079017190625*^9, 3.57079065328125*^9}, CellTags->{"Exercises", "Immediate and Delayed"}], Cell[TextData[{ "Uva\[ZHacek]ujme, \[ZHacek]e ", Cell[BoxData[ RowBox[{"f", "[", "x", "]"}]]], " je definov\[AAcute]na n\[AAcute]sleduj\[IAcute]c\[IAcute]m \ p\[RHacek]edpisem:" }], "Text", CellGroupingRules->{GroupTogetherGrouping, 10005.}, CellChangeTimes->{{3.569851903859375*^9, 3.569851931359375*^9}, 3.570789255734375*^9, 3.57079017190625*^9, 3.57079065328125*^9}, CellTags->{"Exercises", "Immediate and Delayed"}], Cell[BoxData[ RowBox[{ RowBox[{"f", "[", "x_", "]"}], ":=", RowBox[{ RowBox[{"3", " ", SuperscriptBox["x", "2"]}], "-", RowBox[{"2", " ", "x"}]}]}]], "Input", CellGroupingRules->{GroupTogetherGrouping, 10005.}, CellChangeTimes->{3.57078925575*^9, 3.57079017190625*^9, 3.57079065328125*^9}, CellTags->{"Exercises", "Immediate and Delayed"}], Cell[TextData[StyleBox["\tDefinuj derivaci funkce f jako funkci x. M\[URing]\ \[ZHacek]ete pou\[ZHacek]\[IAcute]t okam\[ZHacek]it\[EAcute] p\[RHacek]i\ \[RHacek]azen\[IAcute] (=) nebo odlo\[ZHacek]en\[EAcute] \ p\[RHacek]i\[RHacek]azen\[IAcute] (:=), ale pouze jedno funguje \ spr\[AAcute]vn\[EHacek]. Kter\[EAcute] z nich to je a pro\[CHacek] ?", \ "Text"]], "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10005.}, CellChangeTimes->{{3.569851940375*^9, 3.569852035875*^9}, 3.57078925575*^9, 3.57079017190625*^9, 3.57079065328125*^9, {3.571476355796875*^9, 3.57147636140625*^9}}, CellTags->{"Exercises", "Immediate and Delayed"}], Cell[BoxData[""], "NonPrintButton", CellGroupingRules->{GroupTogetherGrouping, 10005.}, CellChangeTimes->{3.56985209275*^9, 3.57078925575*^9, 3.57079017190625*^9, 3.57079065328125*^9}] }, Open ]], Cell[CellGroupData[{ Cell[TextData[StyleBox["\tLokalizace prom\[EHacek]n\[YAcute]ch", \ "Subsection"]], "ExerciseHeading", CellGroupingRules->{GroupTogetherGrouping, 10006.}, CellChangeTimes->{ 3.569852105890625*^9, {3.569852208890625*^9, 3.569852215796875*^9}, 3.570789263015625*^9, 3.57079017190625*^9, 3.570790664953125*^9}, CellTags->{"Exercises", "Localizing Variables"}], Cell[TextData[{ StyleBox["\tV n\[AAcute]sleduj\[IAcute]c\[IAcute] definici idetifikujte dv\ \[EHacek] glob\[AAcute]ln\[IAcute] prom\[EHacek]n\[EAcute]. Zm\[EHacek]\ \[NHacek]te definici tak, aby jste tyto dv\[EHacek] prom\[EHacek]n\[EAcute] \ lokalizovali s pou\[ZHacek]it\[IAcute]m ", "Text"], StyleBox[Cell[BoxData[ ButtonBox["Module", BaseStyle->"Link", ButtonData->"paclet:ref/Module"]], "Text"], "Text"], "." }], "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10006.}, CellChangeTimes->{{3.569852115625*^9, 3.5698521855*^9}, 3.570789263015625*^9, 3.57079017190625*^9, 3.570790664953125*^9, {3.5714763648125*^9, 3.571476365109375*^9}}, CellTags->{"Exercises", "Localizing Variables"}], Cell[BoxData[ RowBox[{ RowBox[{"f", "[", RowBox[{"p_", ",", "q_"}], "]"}], ":=", RowBox[{"(", "\[IndentingNewLine]", RowBox[{ RowBox[{"temp", "=", RowBox[{"Solve", "[", RowBox[{ RowBox[{ RowBox[{"p", "+", RowBox[{"q", " ", "x"}]}], "\[Equal]", "0"}], ",", "x"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{"x", "/.", "temp"}]}], "\[IndentingNewLine]", ")"}]}]], "Input", CellGroupingRules->{GroupTogetherGrouping, 10006.}, CellChangeTimes->{3.570789263015625*^9, 3.57079017190625*^9, 3.570790664953125*^9}, CellTags->{"Exercises", "Localizing Variables"}], Cell[BoxData[""], "Solution", CellGroupingRules->{GroupTogetherGrouping, 10006.}, CellChangeTimes->{3.570789263015625*^9, 3.570790171921875*^9, 3.570790664953125*^9}, CellTags->{"Exercises", "Localizing Variables"}], Cell["", "NonPrintButton", CellGroupingRules->{GroupTogetherGrouping, 10006.}, CellChangeTimes->{3.5698521946875*^9, 3.570789263015625*^9, 3.570790171921875*^9, 3.570790664953125*^9}] }, Open ]], Cell[CellGroupData[{ Cell[TextData[StyleBox["\tPou\[ZHacek]it\[IAcute] vzor\[URing] a pravidel v \ grafice", "Subsection"]], "ExerciseHeading", CellGroupingRules->{GroupTogetherGrouping, 10007.}, CellChangeTimes->{{3.5698522039375*^9, 3.56985223359375*^9}, 3.570789273015625*^9, 3.570790171921875*^9, 3.570790670828125*^9}, CellTags->{"Exercises", "Using Patterns"}], Cell[TextData[{ StyleBox["\tVyhodno\[THacek]te n\[AAcute]sleduj\[IAcute]c\[IAcute] vstup \ tak, aby jste zkonstruovali a zobrazili ", "Text"], StyleBox[Cell[BoxData[ ButtonBox["Graphics", BaseStyle->"Link", ButtonData->"paclet:ref/Graphics"]], "Text"], "Text"], " ", StyleBox["v\[YAcute]razy. Argumentem ", "Text"], StyleBox[Cell[BoxData[ ButtonBox["Line", BaseStyle->"Link", ButtonData->"paclet:ref/Line"]], "Text"], "Text"], " ", StyleBox["primitivu v ", "Text"], StyleBox[Cell[BoxData[ ButtonBox["Graphics", BaseStyle->"Link", ButtonData->"paclet:ref/Graphics"]], "Text"], "Text"], " ", StyleBox["v\[YAcute]razu je seznam p\[AAcute]ru \tre\[AAcute]ln\[YAcute]ch \ \[CAcute]\[IAcute]sel. Ka\[ZHacek]d\[YAcute] p\[AAcute]r \ \[CHacek]\[IAcute]sel ur\[CHacek]uje koordin\[AAcute]ty ve \ dvourozm\[EHacek]rn\[EAcute]m prostoru.", "Text"] }], "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10007.}, CellChangeTimes->{{3.56985228121875*^9, 3.569852453875*^9}, 3.570789273015625*^9, 3.570790171921875*^9, 3.570790670828125*^9, { 3.571476368703125*^9, 3.571476375359375*^9}}, CellTags->{"Exercises", "Using Patterns"}], Cell[BoxData[ RowBox[{"gr", "=", RowBox[{"Graphics", "[", RowBox[{ RowBox[{"Line", "[", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"0.0", ",", "0.0"}], "}"}], ",", RowBox[{"{", RowBox[{"1.0", ",", "1.0"}], "}"}], ",", RowBox[{"{", RowBox[{"2.0", ",", "0.0"}], "}"}], ",", RowBox[{"{", RowBox[{"3.0", ",", "2.0"}], "}"}], ",", RowBox[{"{", RowBox[{"4.0", ",", "0.0"}], "}"}], ",", RowBox[{"{", RowBox[{"5.0", ",", "2.0"}], "}"}], ",", RowBox[{"{", RowBox[{"6.0", ",", "1.0"}], "}"}], ",", RowBox[{"{", RowBox[{"7.0", ",", "3.0"}], "}"}], ",", RowBox[{"{", RowBox[{"8.0", ",", "0.0"}], "}"}], ",", RowBox[{"{", RowBox[{"9.0", ",", "2.0"}], "}"}], ",", RowBox[{"{", RowBox[{"10.0", ",", "0.0"}], "}"}]}], "}"}], "]"}], ",", RowBox[{"Axes", "\[Rule]", "True"}]}], "]"}]}]], "Input", CellGroupingRules->{GroupTogetherGrouping, 10007.}, CellChangeTimes->{3.570789273015625*^9, 3.570790171921875*^9, 3.570790670828125*^9}, CellTags->{"Exercises", "Using Patterns"}], Cell[TextData[{ StyleBox["\tAplikujte pravidlo na tento ", "Text"], StyleBox[Cell[BoxData[ ButtonBox["Graphics", BaseStyle->"Link", ButtonData->"paclet:ref/Graphics"]], "Text"], "Text"], " ", StyleBox["v\[YAcute]raz tak, aby jste nahradili v\[SHacek]echny p\[AAcute]ry \ re\[AAcute]ln\[YAcute]ch \[CHacek]\[IAcute]sel", "Text"], StyleBox[Cell[BoxData[ RowBox[{"{", RowBox[{"p_Real", ",", "q_Real"}], "}"}]], "Text"], "Text"], " ", StyleBox["seznamem ", "Text"], StyleBox[Cell[BoxData[ RowBox[{"{", RowBox[{"q", ",", "p"}], "}"}]], "Text"], "Text"], " ", StyleBox["tak, \[ZHacek]e sou\[RHacek]adnice v ka\[ZHacek]d\[EAcute]m p\ \[AAcute]ru jsou reverzn\[EHacek] obr\[AAcute]ceny.Zobrazte v\[YAcute]sledek. \ Tato substituce odpov\[IAcute]d\[AAcute] z\[AAcute]m\[EHacek]n\[EHacek] \ vertik\[AAcute]ln\[IAcute] a horizont\[AAcute]ln\[IAcute] dimenze nebo stejn\ \[EAcute] tak otot\[CHacek]en\[IAcute] obr\[AAcute]zku podle \ diagon\[AAcute]ly. ", "Text"] }], "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10007.}, CellChangeTimes->{{3.569852492109375*^9, 3.569852683421875*^9}, 3.570789273015625*^9, 3.570790171921875*^9, 3.570790670828125*^9, { 3.571476379171875*^9, 3.57147639071875*^9}}, CellTags->{"Exercises", "Using Patterns"}], Cell["", "NonPrintButton", CellGroupingRules->{GroupTogetherGrouping, 10007.}, CellChangeTimes->{3.56985268534375*^9, 3.570790670828125*^9}] }, Open ]], Cell[CellGroupData[{ Cell[TextData[StyleBox["\tV\[YAcute]b\[EHacek]r dle vzoru (Pattern \ Matching)", "Subsection"]], "ExerciseHeading", CellGroupingRules->{GroupTogetherGrouping, 10008.}, CellChangeTimes->{{3.56985269525*^9, 3.569852708203125*^9}, 3.570789280078125*^9, 3.570790171921875*^9, 3.570790679765625*^9}, CellTags->{"Exercises", "Pattern Matching"}], Cell[TextData[{ StyleBox["\tDefinujte funkci abs[x], kter\[AAcute] vrac\[IAcute] ", "Text"], StyleBox[Cell[BoxData[ FormBox["x", TraditionalForm]], "Text"], "Text"], StyleBox[", pokud je kladn\[EAcute]", "Text"], " ", StyleBox["a ", "Text"], StyleBox[Cell[BoxData[ FormBox[ RowBox[{"-", "x"}], TraditionalForm]], "Text"], "Text"], " ", StyleBox["pokud je ", "Text"], StyleBox[Cell[BoxData[ FormBox["x", TraditionalForm]], "Text"], "Text"], StyleBox[" z\[AAcute]porn\[EAcute] \[CHacek]\[IAcute]slo; a vrac\[IAcute] ", "Text"], StyleBox[Cell[BoxData[ FormBox[ SqrtBox[ RowBox[{ SuperscriptBox["a", "2"], "+", SuperscriptBox["b", "2"]}]], TraditionalForm]], "Text"], "Text"], StyleBox["pokud je ", "Text"], StyleBox[Cell[BoxData[ FormBox["x", TraditionalForm]], "Text"], "Text"], " ", StyleBox["je komplexn\[IAcute] \[CHacek]\[IAcute]slo ve form\[EHacek] ", "Text"], StyleBox[Cell[BoxData[ FormBox[ RowBox[{"a", "+", RowBox[{"b", " ", "\[ImaginaryI]"}]}], TraditionalForm]], "Text"], "Text"], " ", StyleBox["(", "Text"], StyleBox["a", "Text", FontSlant->"Italic"], StyleBox[" a \t\t\t\t", "Text"], StyleBox["b", "Text", FontSlant->"Italic"], StyleBox[" jsou re\[AAcute]ln\[AAcute] \[CHacek]\[IAcute]sla).", "Text"] }], "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10008.}, CellChangeTimes->{{3.56985275603125*^9, 3.569852880203125*^9}, 3.570789280078125*^9, 3.570790171921875*^9, 3.570790679765625*^9, { 3.5714763949375*^9, 3.571476396390625*^9}}, CellTags->{"Exercises", "Pattern Matching"}], Cell["", "NonPrintButton", CellGroupingRules->{GroupTogetherGrouping, 10008.}, CellChangeTimes->{3.569852883375*^9, 3.570789280078125*^9, 3.570790171921875*^9, 3.570790679765625*^9}] }, Open ]], Cell[CellGroupData[{ Cell[TextData[StyleBox["\tKonstrukce v\[YAcute]razu", "Subsection"]], \ "ExerciseHeading", CellGroupingRules->{GroupTogetherGrouping, 10009.}, CellChangeTimes->{{3.56985289321875*^9, 3.56985290159375*^9}, 3.570789291953125*^9, 3.570790171921875*^9, 3.570790686015625*^9}, CellTags->{"Exercises", "Constructing an Expression"}], Cell[TextData[{ "Jednou z u\[ZHacek]ite\[CHacek]n\[YAcute]ch technik testov\[AAcute]n\ \[IAcute] a trasov\[AAcute]n\[IAcute] program\[URing] v ", StyleBox["Mathematica", FontSlant->"Italic"], " je anal\[YAcute]za v\[YAcute]sledku po dosazen\[IAcute] n\[AAcute]hodn\ \[YAcute]ch \[CHacek]\[IAcute]seln\[YAcute]ch hodnot na m\[IAcute]sto jak\ \[YAcute]chkoliv symbolick\[YAcute]ch prom\[EHacek]nn\[YAcute]ch v programu." }], "Text", CellGroupingRules->{GroupTogetherGrouping, 10009.}, CellChangeTimes->{{3.569852915625*^9, 3.569852999578125*^9}, 3.570789291953125*^9, 3.570790171921875*^9, 3.570790686015625*^9}, CellTags->{"Exercises", "Constructing an Expression"}], Cell[TextData[{ StyleBox["\tPou\[ZHacek]ijte n\[AAcute]sleduj\[IAcute]c\[IAcute] seznam prom\ \[EHacek]n\[YAcute]ch ke konstrukci seznamu pravidel, kter\[AAcute] nahrad\ \[IAcute] ka\[ZHacek]dou prom\[EHacek]nou v seznamu n\[AAcute]hodn\[YAcute]m \ \[CHacek]\[IAcute]slem vygenerovan\[YAcute]m s pou\[ZHacek]it\[IAcute]m ", "Text"], StyleBox[Cell[BoxData[ ButtonBox["RandomReal", BaseStyle->"Link", ButtonData->"paclet:ref/RandomReal"]], "Text"], "Text"], "." }], "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10009.}, CellChangeTimes->{{3.569853009890625*^9, 3.569853095609375*^9}, 3.570789291953125*^9, 3.570790171921875*^9, 3.570790686015625*^9, { 3.5714764019375*^9, 3.5714764093125*^9}}, CellTags->{"Exercises", "Constructing an Expression"}], Cell[BoxData[ RowBox[{ RowBox[{"vars", "=", RowBox[{"{", RowBox[{ "xxy", ",", "xxz", ",", "xyy", ",", "yxx", ",", "yzz", ",", "yzy"}], "}"}]}], ";"}]], "Input", CellGroupingRules->{GroupTogetherGrouping, 10009.}, CellChangeTimes->{3.570789291953125*^9, 3.570790171921875*^9, 3.570790686015625*^9}, CellTags->{"Exercises", "Constructing an Expression"}], Cell[BoxData[""], "NonPrintButton", CellGroupingRules->{GroupTogetherGrouping, 10009.}, CellChangeTimes->{3.56985312078125*^9, 3.570789291953125*^9, 3.570790171921875*^9, 3.570790686015625*^9}], Cell[TextData[StyleBox["\tPou\[ZHacek]ijte seznam pravidel z p\[RHacek]edch\ \[AAcute]zej\[IAcute]c\[IAcute]ho p\[RHacek]\[IAcute]kladu k nalezen\[IAcute] \ symbolick\[EAcute] prom\[EHacek]n\[EAcute] v n\[AAcute]sleduj\[IAcute]c\ \[IAcute]m v\[YAcute]razu, kter\[AAcute] nen\[IAcute] mezi \[SHacek]esti prom\ \[EAcute]n\[YAcute]mi v prom\[EHacek]n\[EAcute] vars. Po vlo\[ZHacek]en\ \[IAcute] \[CHacek]\[IAcute]seln\[YAcute]ch hodnot pro vypsan\[EAcute] prom\ \[EHacek]nn\[EAcute] se v\[YAcute]raz zjednodu\[SHacek]\[IAcute] na \ v\[YAcute]raz, ve kter\[EAcute]m bude hledan\[AAcute] prom\[EHacek]n\[AAcute] \ nevy\[CHacek]\[IAcute]slena. ", "Text"]], "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10009.}, CellChangeTimes->{{3.5698531314375*^9, 3.569853316984375*^9}, 3.570789291953125*^9, 3.570790171921875*^9, 3.570790686015625*^9, { 3.5714764135625*^9, 3.571476418890625*^9}}, CellTags->{"Exercises", "Constructing an Expression"}], Cell[BoxData[ RowBox[{ RowBox[{"expr", "=", RowBox[{ RowBox[{"-", FractionBox[ RowBox[{"11", "+", RowBox[{"11", " ", "xxz"}], "+", RowBox[{"7", " ", "xyy"}], "+", RowBox[{"21", " ", "yzy"}]}], SuperscriptBox[ RowBox[{"(", RowBox[{"1", "+", RowBox[{"5", " ", "xxy"}], "+", RowBox[{"11", " ", "xxz"}], "+", RowBox[{"11", " ", "yxx"}]}], ")"}], "2"]]}], "+", FractionBox[ RowBox[{ RowBox[{"2", " ", "xxy"}], "+", RowBox[{"10", " ", "xxz"}], "+", RowBox[{"6", " ", "xyy"}], "+", RowBox[{"9", " ", "yzy"}], "+", RowBox[{"2", " ", "yzz"}]}], SuperscriptBox[ RowBox[{"(", RowBox[{"3", "+", RowBox[{"11", " ", "xxy"}], "+", RowBox[{"5", " ", "xxz"}], "+", RowBox[{"14", " ", "xyy"}], "+", RowBox[{"5", " ", "yzy"}]}], ")"}], "2"]], "+", FractionBox[ SuperscriptBox[ RowBox[{"(", RowBox[{"5", "+", RowBox[{"10", " ", "xxy"}], "+", RowBox[{"7", " ", "xxz"}], "+", RowBox[{"11", " ", "xyy"}], "+", RowBox[{"8", " ", "yxx"}], "+", RowBox[{"4", " ", "yzz"}]}], ")"}], "2"], RowBox[{ RowBox[{"6", " ", "xxy"}], "+", RowBox[{"9", " ", "xxz"}], "+", RowBox[{"8", " ", "xyy"}], "+", RowBox[{"2", " ", "yxx"}], "+", RowBox[{"9", " ", "yzy"}]}]], "-", FractionBox[ RowBox[{"4", "+", RowBox[{"2", " ", "xxy"}], "+", RowBox[{"4", " ", "xxz"}], "+", RowBox[{"10", " ", "xyy"}], "+", RowBox[{"8", " ", "yxx"}], "+", RowBox[{"5", " ", "yzy"}], "+", RowBox[{"4", " ", "yzz"}]}], SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"3", " ", "xxy"}], "+", RowBox[{"6", " ", "xxz"}], "+", RowBox[{"4", " ", "yxx"}], "+", RowBox[{"6", " ", "yzz"}]}], ")"}], "2"]], "+", FractionBox[ RowBox[{ RowBox[{"11", " ", "xxy"}], "+", RowBox[{"8", " ", "xxz"}], "+", RowBox[{"5", " ", "xyy"}], "+", RowBox[{"6", " ", "yxy"}], "+", "yzz"}], SuperscriptBox[ RowBox[{"(", RowBox[{"1", "+", RowBox[{"8", " ", "xxy"}], "+", RowBox[{"7", " ", "xxz"}], "+", RowBox[{"11", " ", "yxx"}], "+", RowBox[{"8", " ", "yzz"}]}], ")"}], "2"]], "+", FractionBox[ SuperscriptBox[ RowBox[{"(", RowBox[{ RowBox[{"4", " ", "xyy"}], "+", RowBox[{"9", " ", "yxx"}], "+", RowBox[{"3", " ", "yzy"}], "+", RowBox[{"6", " ", "yzz"}]}], ")"}], "2"], RowBox[{ RowBox[{"3", " ", "xxz"}], "+", RowBox[{"19", " ", "xyy"}], "+", RowBox[{"15", " ", "yzz"}]}]]}]}], ";"}]], "Input", CellGroupingRules->{GroupTogetherGrouping, 10009.}, CellChangeTimes->{3.570789291953125*^9, 3.570790171921875*^9, 3.570790686015625*^9}, CellTags->{"Exercises", "Constructing an Expression"}], Cell["", "NonPrintButton", CellGroupingRules->{GroupTogetherGrouping, 10009.}, CellChangeTimes->{3.56985332478125*^9, 3.570789291953125*^9, 3.570790171921875*^9, 3.570790686015625*^9}] }, Open ]], Cell[BoxData[""], "NonPrintButton", CellChangeTimes->{3.5698533566875*^9, 3.570789291953125*^9, 3.570790171921875*^9}], Cell[CellGroupData[{ Cell[TextData[StyleBox["\tOdlo\[ZHacek]en\[AAcute] pravidla", "Subsection"]], \ "ExerciseHeading", CellGroupingRules->{GroupTogetherGrouping, 10000.}, CellChangeTimes->{{3.56985336596875*^9, 3.569853372296875*^9}, 3.570789304765625*^9, 3.570790171921875*^9, 3.570790695359375*^9}, CellTags->{"Exercises", "Delayed Rules"}], Cell["\<\ Zde je definice funkce pro v\[YAcute]po\[CHacek]et faktori\[AAcute]lu, kter\ \[AAcute] pou\[ZHacek]\[IAcute]v\[AAcute] dv\[EHacek] \[CHacek]\[AAcute]sti. \ Jedna o\[SHacek]et\[RHacek]uje z\[AAcute]kladn\[IAcute] \ p\[RHacek]\[IAcute]pad faktori\[AAcute]lu nuly neboli \ ukon\[CHacek]ov\[AAcute]c\[IAcute] podm\[IAcute]nku a druh\[AAcute] \[CHacek]\ \[AAcute]st definuje rekurzi. \ \>", "Text", CellGroupingRules->{GroupTogetherGrouping, 10000.}, CellChangeTimes->{{3.5699125436959214`*^9, 3.5699126356021714`*^9}, 3.570789304765625*^9, 3.570790171921875*^9, 3.570790695359375*^9}, CellTags->{"Exercises", "Delayed Rules"}], Cell[BoxData[{ RowBox[{ RowBox[{ RowBox[{"fac", "[", "0", "]"}], "=", "1"}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"fac", "[", "n_", "]"}], ":=", RowBox[{"n", " ", RowBox[{"fac", "[", RowBox[{"n", "-", "1"}], "]"}]}]}]}], "Input", CellGroupingRules->{GroupTogetherGrouping, 10000.}, CellChangeTimes->{3.570789304765625*^9, 3.570790171921875*^9, 3.570790695359375*^9}, CellTags->{"Exercises", "Delayed Rules"}], Cell[BoxData[ RowBox[{"Table", "[", RowBox[{ RowBox[{"fac", "[", "m", "]"}], ",", RowBox[{"{", RowBox[{"m", ",", "10"}], "}"}]}], "]"}]], "Input", CellGroupingRules->{GroupTogetherGrouping, 10000.}, CellChangeTimes->{3.570789304765625*^9, 3.570790171921875*^9, 3.570790695359375*^9}, CellTags->{"Exercises", "Delayed Rules"}], Cell["", "Text", CellGroupingRules->{GroupTogetherGrouping, 10000.}, CellChangeTimes->{{3.5699128940084214`*^9, 3.5699128988990464`*^9}, 3.570789304765625*^9, 3.570790171921875*^9, 3.570790695359375*^9}], Cell["\<\ V\[SHacek]imn\[EHacek]me si, \[ZHacek]e prvn\[IAcute] \[CHacek]\[AAcute]st je \ definov\[AAcute]na jako okam\[ZHacek]it\[EAcute] p\[RHacek]i\[RHacek]azen\ \[IAcute], zatimci druh\[AAcute] \[CHacek]\[AAcute]st jako odlo\[ZHacek]en\ \[EAcute] p\[RHacek]i\[RHacek]azen\[IAcute].\ \>", "Text", CellGroupingRules->{GroupTogetherGrouping, 10000.}, CellChangeTimes->{{3.5699126445240464`*^9, 3.5699126824615464`*^9}, 3.570789304765625*^9, 3.570790171921875*^9, 3.570790695359375*^9}, CellTags->{"Exercises", "Delayed Rules"}], Cell[TextData[{ StyleBox["\tVytvo\[RHacek]te mno\[ZHacek]inu substitu\[CHacek]n\[IAcute]ch \ pravidel a aplikujte je na v\[YAcute]raz pro v\[YAcute]po\[CHacek]et 10!. M\ \[EHacek]li by jste pracovat s opakuj\[IAcute]c\[IAcute] se \ substituc\[IAcute] neboli opakuj\[IAcute]c\[IAcute]m se aplikov\[AAcute]n\ \[IAcute]m substitu\[CHacek]n\[IAcute]ch pravidel (", "Text"], StyleBox[Cell[BoxData[ ButtonBox["ReplaceRepeated", BaseStyle->"Link", ButtonData->"paclet:ref/ReplaceRepeated"]], "Text"], "Text"], ", ", StyleBox["s kr\[AAcute]tkou notac\[IAcute] //.) stejn\[EHacek] tak jako s \ odlo\[ZHacek]en\[YAcute]mi pravidly (", "Text"], StyleBox[Cell[BoxData[ ButtonBox["RuleDelayed", BaseStyle->"Link", ButtonData->"paclet:ref/RuleDelayed"]], "Text"], "Text"], ", ", StyleBox["s kr\[AAcute]tkou notac\[IAcute] :>).", "Text"] }], "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10000.}, CellChangeTimes->{{3.5699127100552964`*^9, 3.5699128547740464`*^9}, 3.570789304765625*^9, 3.570790171921875*^9, 3.570790695359375*^9, { 3.5714764259375*^9, 3.5714764306875*^9}}, CellTags->{"Exercises", "Delayed Rules"}], Cell[BoxData[""], "NonPrintButton", CellGroupingRules->{GroupTogetherGrouping, 10000.}, CellChangeTimes->{3.5699128817896714`*^9, 3.570789304765625*^9, 3.570790171921875*^9, 3.570790695359375*^9}] }, Open ]], Cell[CellGroupData[{ Cell[TextData[StyleBox["\tForm\[AAcute]tov\[AAcute]n\[IAcute] \[CHacek]\ \[IAcute]sel v tabulce", "Subsection"]], "ExerciseHeading", CellGroupingRules->{GroupTogetherGrouping, 10001.}, CellChangeTimes->{{3.5699128915084214`*^9, 3.5699129107740464`*^9}, 3.570789313109375*^9, 3.570790171921875*^9, 3.57079070321875*^9}, CellTags->{"Exercises", "Formatting Numbers"}], Cell[TextData[{ StyleBox["\tVyhodno\[THacek]te n\[AAcute]sleduj\[IAcute]c\[IAcute] dva \ vstupy, \[RHacek]e\[SHacek]\[IAcute]c\[IAcute] diferenci\[AAcute]ln\[IAcute] \ rovnici a zobrazte tabulku v\[YAcute]sledk\[URing]. Druh\[YAcute] sloupec v \ tabulce je form\[AAcute]tov\[AAcute]n s pou\[ZHacek]it\[IAcute]m ", "Text"], StyleBox[Cell[BoxData[ ButtonBox["PaddedForm", BaseStyle->"Link", ButtonData->"paclet:ref/PaddedForm"]], "Text"], "Text"], " , ", StyleBox["tak\[ZHacek]e ka\[ZHacek]d\[AAcute] polo\[ZHacek]ka ve sloupci m\ \[AAcute] 4 \[CHacek]\[IAcute]slice napravo od desetinn\[EAcute] \[CHacek]\ \[AAcute]rky. ", "Text"] }], "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10001.}, CellChangeTimes->{{3.5699129273365464`*^9, 3.5699129278209214`*^9}, { 3.56991303478125*^9, 3.569913163453125*^9}, 3.570789313109375*^9, 3.570790171921875*^9, 3.57079070321875*^9, {3.571476434328125*^9, 3.571476440953125*^9}}, CellTags->{"Exercises", "Formatting Numbers"}], Cell[BoxData[ RowBox[{"Clear", "[", RowBox[{"f", ",", "t"}], "]"}]], "Input", CellGroupingRules->{GroupTogetherGrouping, 10001.}, CellChangeTimes->{3.570789313109375*^9, 3.570790171921875*^9, 3.57079070321875*^9}], Cell[BoxData[ RowBox[{"sol", "=", RowBox[{"NDSolve", "[", RowBox[{ RowBox[{"{", RowBox[{ RowBox[{ RowBox[{ RowBox[{"f", "''"}], "[", "t", "]"}], "\[Equal]", RowBox[{ RowBox[{"2", RowBox[{"f", "[", "t", "]"}]}], "-", "25"}]}], ",", RowBox[{ RowBox[{"f", "[", "0", "]"}], "\[Equal]", "1"}], ",", RowBox[{ RowBox[{"f", "[", "5", "]"}], "\[Equal]", "250"}]}], "}"}], ",", "f", ",", RowBox[{"{", RowBox[{"t", ",", "0", ",", "5"}], "}"}]}], "]"}]}]], "Input", CellGroupingRules->{GroupTogetherGrouping, 10001.}, CellChangeTimes->{3.570789313109375*^9, 3.570790171921875*^9, 3.57079070321875*^9}, CellTags->{"Exercises", "Formatting Numbers"}], Cell[BoxData[ RowBox[{"TableForm", "[", RowBox[{"Table", "[", RowBox[{ RowBox[{"{", RowBox[{"t", ",", RowBox[{"PaddedForm", "[", RowBox[{ RowBox[{ RowBox[{"f", "[", "t", "]"}], "/.", RowBox[{"sol", "[", RowBox[{"[", "1", "]"}], "]"}]}], ",", RowBox[{"{", RowBox[{"7", ",", "4"}], "}"}]}], "]"}]}], "}"}], ",", RowBox[{"{", RowBox[{"t", ",", "0.0", ",", "5", ",", "0.5"}], "}"}]}], "]"}], "]"}]], "Input", CellGroupingRules->{GroupTogetherGrouping, 10001.}, CellChangeTimes->{3.570789313109375*^9, 3.570790171921875*^9, 3.57079070321875*^9}, CellTags->{"Exercises", "Formatting Numbers"}], Cell[TextData[StyleBox["\tZm\[EHacek]\[NHacek]te tabulku tak, \[ZHacek]e data \ v prvn\[IAcute]m sloupci jsou form\[AAcute]tov\[AAcute]na s jednou \[CHacek]\ \[IAcute]slic\[IAcute] napravo od desetinn\[EAcute] \[CHacek]\[AAcute]rky. V\ \[YAcute]sledn\[AAcute] tabulka by m\[EHacek]la vypadat jako n\[AAcute]sleduj\ \[IAcute]c\[IAcute] uk\[AAcute]zka. ", "Text"]], "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10001.}, CellChangeTimes->{{3.569913178234375*^9, 3.569913247359375*^9}, 3.570789313109375*^9, 3.570790171921875*^9, 3.57079070321875*^9, { 3.571476444453125*^9, 3.571476451296875*^9}}, CellTags->{"Exercises", "Formatting Numbers"}], Cell[BoxData[ TagBox[GridBox[{ { TagBox[ InterpretationBox["\<\" 0.0\"\>", 0., AutoDelete->True], PaddedForm[#, {2, 1}]& ], TagBox[ InterpretationBox["\<\" 1.0000\"\>", 1., AutoDelete->True], PaddedForm[#, {7, 4}]& ]}, { TagBox[ InterpretationBox["\<\" 0.5\"\>", 0.5, AutoDelete->True], PaddedForm[#, {2, 1}]& ], TagBox[ InterpretationBox["\<\" 7.1394\"\>", 7.139364644075419, AutoDelete->True], PaddedForm[#, {7, 4}]& ]}, { TagBox[ InterpretationBox["\<\" 1.0\"\>", 1., AutoDelete->True], PaddedForm[#, {2, 1}]& ], TagBox[ InterpretationBox["\<\" 10.4849\"\>", 10.484853694263533`, AutoDelete->True], PaddedForm[#, {7, 4}]& ]}, { TagBox[ InterpretationBox["\<\" 1.5\"\>", 1.5, AutoDelete->True], PaddedForm[#, {2, 1}]& ], TagBox[ InterpretationBox["\<\" 12.7801\"\>", 12.78008125731648, AutoDelete->True], PaddedForm[#, {7, 4}]& ]}, { TagBox[ InterpretationBox["\<\" 2.0\"\>", 2., AutoDelete->True], PaddedForm[#, {2, 1}]& ], TagBox[ InterpretationBox["\<\" 15.2213\"\>", 15.22128262914195, AutoDelete->True], PaddedForm[#, {7, 4}]& ]}, { TagBox[ InterpretationBox["\<\" 2.5\"\>", 2.5, AutoDelete->True], PaddedForm[#, {2, 1}]& ], TagBox[ InterpretationBox["\<\" 19.0808\"\>", 19.080772200534383`, AutoDelete->True], PaddedForm[#, {7, 4}]& ]}, { TagBox[ InterpretationBox["\<\" 3.0\"\>", 3., AutoDelete->True], PaddedForm[#, {2, 1}]& ], TagBox[ InterpretationBox["\<\" 26.3701\"\>", 26.37005304300143, AutoDelete->True], PaddedForm[#, {7, 4}]& ]}, { TagBox[ InterpretationBox["\<\" 3.5\"\>", 3.5, AutoDelete->True], PaddedForm[#, {2, 1}]& ], TagBox[ InterpretationBox["\<\" 40.8882\"\>", 40.88817954909075, AutoDelete->True], PaddedForm[#, {7, 4}]& ]}, { TagBox[ InterpretationBox["\<\" 4.0\"\>", 4., AutoDelete->True], PaddedForm[#, {2, 1}]& ], TagBox[ InterpretationBox["\<\" 70.2018\"\>", 70.20176272683099, AutoDelete->True], PaddedForm[#, {7, 4}]& ]}, { TagBox[ InterpretationBox["\<\" 4.5\"\>", 4.5, AutoDelete->True], PaddedForm[#, {2, 1}]& ], TagBox[ InterpretationBox["\<\" 129.5886\"\>", 129.58856457786374`, AutoDelete->True], PaddedForm[#, {7, 4}]& ]}, { TagBox[ InterpretationBox["\<\" 5.0\"\>", 5., AutoDelete->True], PaddedForm[#, {2, 1}]& ], TagBox[ InterpretationBox["\<\" 250.0000\"\>", 250.00001770713203`, AutoDelete->True], PaddedForm[#, {7, 4}]& ]} }, GridBoxAlignment->{ "Columns" -> {{Left}}, "ColumnsIndexed" -> {}, "Rows" -> {{Baseline}}, "RowsIndexed" -> {}}, GridBoxSpacings->{"Columns" -> { Offset[0.27999999999999997`], { Offset[0.7]}, Offset[0.27999999999999997`]}, "ColumnsIndexed" -> {}, "Rows" -> { Offset[0.2], { Offset[0.4]}, Offset[0.2]}, "RowsIndexed" -> {}}], Function[BoxForm`e$, MatrixForm[BoxForm`e$]]]], "Output", CellGroupingRules->{GroupTogetherGrouping, 10001.}, ShowCellLabel->False, CellChangeTimes->{3.570789313109375*^9, 3.570790171921875*^9, 3.57079070321875*^9}, CellTags->{"Exercises", "Formatting Numbers"}], Cell["", "NonPrintButton", CellGroupingRules->{GroupTogetherGrouping, 10001.}, CellChangeTimes->{3.56991325765625*^9, 3.570789313109375*^9, 3.5707901719375*^9, 3.57079070321875*^9}] }, Open ]], Cell[CellGroupData[{ Cell[TextData[StyleBox["\tProgramovac\[IAcute] styl", "Subsection"]], \ "ExerciseHeading", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellChangeTimes->{{3.569913278625*^9, 3.569913289078125*^9}, 3.5707893238125*^9, 3.5707901719375*^9, 3.570790710921875*^9}, CellTags->{"Exercises", "Programming Style"}], Cell[TextData[StyleBox["\tVyhodno\[THacek] n\[AAcute]slduj\[IAcute]c\[IAcute] \ vstup a definujte data v seznamu p\[AAcute]r\[URing] prvk\[URing].", \ "Text"]], "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellChangeTimes->{{3.569913299546875*^9, 3.56991330953125*^9}, { 3.569913448703125*^9, 3.56991347103125*^9}, 3.5707893238125*^9, 3.5707901719375*^9, 3.570790710921875*^9, {3.571476455421875*^9, 3.57147645565625*^9}}, CellTags->{"Exercises", "Programming Style"}], Cell[BoxData[ RowBox[{ RowBox[{"data", "=", RowBox[{"{", RowBox[{ RowBox[{"{", RowBox[{"x1", ",", "y1"}], "}"}], ",", RowBox[{"{", RowBox[{"x2", ",", "y2"}], "}"}], ",", RowBox[{"{", RowBox[{"x3", ",", "y3"}], "}"}], ",", RowBox[{"{", RowBox[{"x4", ",", "y4"}], "}"}], ",", RowBox[{"{", RowBox[{"x5", ",", "y5"}], "}"}]}], "}"}]}], ";"}]], "Input", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellChangeTimes->{3.5707893238125*^9, 3.5707901719375*^9, 3.570790710921875*^9}, CellTags->{"Exercises", "Programming Style"}], Cell[TextData[{ StyleBox["\tN\[AAcute]sleduj\[IAcute]c\[IAcute] procedur\[AAcute]ln\[IAcute] \ program obr\[AAcute]t\[IAcute] pop\[RHacek]ad\[IAcute] prvk\[URing] v ka\ \[ZHacek]d\[EAcute]m p\[AAcute]ru. Vyhodno\[THacek]te tento vstup. Program \ nejd\[RHacek]\[IAcute]ve inicializuje seznam, do kter\[EAcute]ho \ nam\[IAcute]sto prvk\[URing] vlo\[ZHacek]\[IAcute] ", "Text"], StyleBox[Cell[BoxData[ ButtonBox["Null", BaseStyle->"Link", ButtonData->"paclet:ref/Null"]], "Text"], "Text"], " ", StyleBox["a potom m\[IAcute]sto ka\[ZHacek]d\[EAcute] dvojice p\[RHacek]i\ \[RHacek]ad\[IAcute] na odpov\[IAcute]daj\[IAcute]c\[IAcute] m\[IAcute]sto \ obr\[AAcute]cenou dvojici (Reverse) ", "Text"] }], "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellChangeTimes->{{3.56991533353125*^9, 3.569915467328125*^9}, { 3.5699155625625*^9, 3.569915582046875*^9}, 3.5707893238125*^9, 3.5707901719375*^9, 3.570790710921875*^9, {3.57147645775*^9, 3.571476467171875*^9}}, CellTags->{"Exercises", "Programming Style"}], Cell[BoxData[{ RowBox[{ RowBox[{"result", "=", RowBox[{"Table", "[", RowBox[{"Null", ",", RowBox[{"{", RowBox[{"Length", "[", "data", "]"}], "}"}]}], "]"}]}], ";"}], "\[IndentingNewLine]", RowBox[{ RowBox[{"Do", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{ RowBox[{"result", "[", RowBox[{"[", "k", "]"}], "]"}], "=", RowBox[{"Reverse", "[", RowBox[{"data", "[", RowBox[{"[", "k", "]"}], "]"}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"k", ",", "1", ",", RowBox[{"Length", "[", "data", "]"}]}], "}"}]}], "\[IndentingNewLine]", "]"}], ";"}], "\[IndentingNewLine]", "result"}], "Input", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellChangeTimes->{3.570789323828125*^9, 3.5707901719375*^9, 3.570790710921875*^9}, CellTags->{"Exercises", "Programming Style"}], Cell[TextData[StyleBox["\tStejnou operaci provede n\[AAcute]sleduj\[IAcute]c\ \[IAcute] funkcion\[AAcute]ln\[IAcute] program", "Text"]], "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellChangeTimes->{{3.569915597265625*^9, 3.5699156263125*^9}, 3.570789323828125*^9, 3.5707901719375*^9, 3.570790710921875*^9, { 3.571476472046875*^9, 3.571476472234375*^9}}, CellTags->{"Exercises", "Programming Style"}], Cell[BoxData[ RowBox[{"Map", "[", RowBox[{"Reverse", ",", "data"}], "]"}]], "Input", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellChangeTimes->{3.570789323828125*^9, 3.5707901719375*^9, 3.570790710921875*^9}, CellTags->{"Exercises", "Programming Style"}], Cell[TextData[StyleBox["\tA nakonec tot\[EAcute]\[ZHacek] provede \ n\[AAcute]sleduj\[IAcute]c\[IAcute] substitu\[CHacek]n\[IAcute] pravidlo", \ "Text"]], "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellChangeTimes->{{3.56991563240625*^9, 3.56991565625*^9}, 3.570789323828125*^9, 3.5707901719375*^9, 3.5707907109375*^9, { 3.5714764744375*^9, 3.57147647459375*^9}}, CellTags->{"Exercises", "Programming Style"}], Cell[BoxData[ RowBox[{"data", "/.", RowBox[{ RowBox[{"{", RowBox[{"p_", ",", "q_"}], "}"}], "\[Rule]", RowBox[{"{", RowBox[{"q", ",", "p"}], "}"}]}]}]], "Input", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellChangeTimes->{3.570789323828125*^9, 3.5707901719375*^9, 3.5707907109375*^9}, CellTags->{"Exercises", "Programming Style"}], Cell[TextData[{ StyleBox["\tUpravte tyto programy tak, aby v\[YAcute]sledkem byl seznam prvn\ \[IAcute]ch prvk\[URing] v ka\[ZHacek]d\[EAcute]m p\[AAcute]ru tj. seznam ", "Text"], StyleBox[Cell[BoxData[ RowBox[{"{", RowBox[{"x1", ",", "x2", ",", "x3", ",", "x4", ",", "x5"}], "}"}]], "Text"], "Text"], "." }], "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellChangeTimes->{{3.56991566140625*^9, 3.56991571684375*^9}, 3.570789323828125*^9, 3.5707901719375*^9, 3.5707907109375*^9, { 3.5714764766875*^9, 3.571476476828125*^9}}, CellTags->{"Exercises", "Programming Style"}], Cell["", "NonPrintButton", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellChangeTimes->{3.56991571953125*^9, 3.570789323828125*^9, 3.5707901719375*^9, 3.5707907109375*^9}], Cell[TextData[StyleBox["\tNyn\[IAcute] upravte tyto programy tak, aby vr\ \[AAcute]tily seznam sou\[CHacek]tu prvk\[URing] v ka\[ZHacek]d\[EAcute]m p\ \[AAcute]ru. ", "Text"]], "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellChangeTimes->{{3.569915725484375*^9, 3.569915760109375*^9}, 3.570789323828125*^9, 3.5707901719375*^9, 3.5707907109375*^9, { 3.571476479671875*^9, 3.571476479828125*^9}}, CellTags->{"Exercises", "Programming Style"}], Cell["", "NonPrintButton", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellChangeTimes->{3.569915762390625*^9, 3.570789323828125*^9, 3.5707901719375*^9, 3.5707907109375*^9}] }, Open ]], Cell[CellGroupData[{ Cell[TextData[StyleBox["\tTrasov\[AAcute]n\[IAcute] procedur\[AAcute]ln\ \[IAcute]ho programu", "Subsection"]], "ExerciseHeading", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellChangeTimes->{{3.56991576915625*^9, 3.56991578284375*^9}, 3.570789335984375*^9, 3.5707901719375*^9, 3.570790719171875*^9}, CellTags->{"Exercises", "Debugging a Program"}], Cell[TextData[StyleBox["\tVyhodno\[THacek]te n\[AAcute]sleduj\[IAcute]c\ \[IAcute] vstup, kter\[YAcute] definuje funkci f s matic\[IAcute] jako vstupn\ \[IAcute]m argumentem. Funkce vr\[AAcute]t\[IAcute] \[RHacek]\[AAcute]dek \ matice, jeho\[ZHacek] prvn\[IAcute] prvek m\[AAcute] nejv\[EHacek]t\[SHacek]\ \[IAcute] absolutn\[IAcute] hodnotu ze v\[SHacek]ech prvn\[IAcute]ch prvk\ \[URing] v \[RHacek]\[AAcute]dce.", "Text"]], "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellChangeTimes->{{3.569915791140625*^9, 3.56991591990625*^9}, 3.570787675328125*^9, 3.570789335984375*^9, 3.5707901719375*^9, 3.570790719171875*^9, {3.571476484328125*^9, 3.57147648953125*^9}}, CellTags->{"Exercises", "Debugging a Program"}], Cell[BoxData[ RowBox[{ RowBox[{"f", "[", "m_", "]"}], ":=", RowBox[{"Module", "[", RowBox[{ RowBox[{"{", "result", "}"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{ RowBox[{"result", "=", RowBox[{"m", "[", RowBox[{"[", "1", "]"}], "]"}]}], ";", "\[IndentingNewLine]", RowBox[{ RowBox[{"Do", "[", "\[IndentingNewLine]", RowBox[{ RowBox[{"If", "[", RowBox[{ RowBox[{ RowBox[{"Abs", "[", RowBox[{"m", "[", RowBox[{"[", RowBox[{"k", ",", "1"}], "]"}], "]"}], "]"}], ">", RowBox[{"Abs", "[", RowBox[{"result", "[", RowBox[{"[", "1", "]"}], "]"}], "]"}]}], ",", "\[IndentingNewLine]", RowBox[{"result", "=", RowBox[{"m", "[", RowBox[{"[", "k", "]"}], "]"}]}]}], "]"}], ",", "\[IndentingNewLine]", RowBox[{"{", RowBox[{"k", ",", "2", ",", RowBox[{"Length", "[", "m", "]"}]}], "}"}]}], "\[IndentingNewLine]", "]"}], "\[IndentingNewLine]", "result"}]}], "}"}]}], "\[IndentingNewLine]", "]"}]}]], "Input", WholeCellGroupOpener->True, CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellChangeTimes->{3.570789335984375*^9, 3.5707901719375*^9, 3.570790719171875*^9}, CellTags->{"Exercises", "Debugging a Program"}], Cell[TextData[{ StyleBox["\tVyhodno\[THacek]te n\[AAcute]sleduj\[IAcute]c\[IAcute] vstup a v\ \[SHacek]imn\[EHacek]te si, \[ZHacek]e program ned\[EHacek]l\[AAcute] p\ \[RHacek]esn\[EHacek] to, co m\[AAcute]. Vrac\[IAcute] sice po\[ZHacek]adovan\ \[YAcute] \[RHacek]\[AAcute]dek, ale ka\[ZHacek]d\[YAcute] prvek je vyn\ \[AAcute]soben ", "Text"], StyleBox[Cell[BoxData[ ButtonBox["Null", BaseStyle->"Link", ButtonData->"paclet:ref/Null"]], "Text"], "Text"], ", ", StyleBox["a \[RHacek]\[AAcute]dek uzav\[RHacek]en jako seznam.", "Text"] }], "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellChangeTimes->{{3.56991592828125*^9, 3.56991603978125*^9}, 3.570789335984375*^9, 3.5707901719375*^9, 3.570790719171875*^9, { 3.5714764940625*^9, 3.571476498515625*^9}}, CellTags->{"Exercises", "Debugging a Program"}], Cell[BoxData[ RowBox[{"f", "[", RowBox[{"(", GridBox[{ {"1", "4", "7"}, {"9", "1", "8"}, {"4", "6", "1"}, {"11", "5", "8"}, {"6", "1", "1"} }], ")"}], "]"}]], "Input", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellChangeTimes->{3.570789335984375*^9, 3.5707901719375*^9, 3.570790719171875*^9}, CellTags->{"Exercises", "Debugging a Program"}], Cell[TextData[{ StyleBox["\tOpravte definici funkce tak, aby jste popsan\[EAcute] \ dv\[EHacek] chyby odstranili. V\[YAcute]sledek na pou\[ZHacek]it\[EAcute] \ matici by m\[EHacek]l b\[YAcute]t ", "Text"], StyleBox[Cell[BoxData[ RowBox[{"{", RowBox[{"11", ",", "5", ",", "8"}], "}"}]], "Text"], "Text"], "." }], "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellChangeTimes->{{3.569916113859375*^9, 3.569916156875*^9}, { 3.569916278453125*^9, 3.569916278984375*^9}, 3.570789335984375*^9, 3.5707901719375*^9, 3.570790719171875*^9, {3.571476503765625*^9, 3.571476503953125*^9}}, CellTags->{"Exercises", "Debugging a Program"}] }, Open ]], Cell["", "NonPrintButton", CellChangeTimes->{3.56991611165625*^9, 3.570789335984375*^9, 3.5707901719375*^9}], Cell["", "Spacer", CellChangeTimes->{3.570789335984375*^9, 3.5707901719375*^9}] }, Open ]], Cell[CellGroupData[{ Cell["", "SlideShowNavigationBar", CellTags->{"SlideShowHeader", "Exercises"}], Cell[TextData[StyleBox["\tZ\[AAcute]v\[EHacek]re\[CHacek]n\[YAcute] \ \[UAcute]klid", "Section"]], "NonPrintSection", CellChangeTimes->{{3.569916170640625*^9, 3.569916180125*^9}, { 3.57079186103125*^9, 3.570791883828125*^9}}], Cell[BoxData[ RowBox[{ RowBox[{"Clear", "[", "\"\\"", "]"}], ";"}]], "Input", CellChangeTimes->{{3.569916216515625*^9, 3.569916236125*^9}}], Cell[BoxData[ RowBox[{"\t\t", StyleBox[ RowBox[{ RowBox[{"$Line", "=", "0"}], ";"}], "Input"]}]], "NonPrintInput", InitializationCell->True, CellChangeTimes->{ 3.56991609453125*^9, {3.569916247953125*^9, 3.569916271453125*^9}, { 3.571476508703125*^9, 3.5714765096875*^9}}], Cell[BoxData[""], "Input", CellChangeTimes->{{3.571476513640625*^9, 3.5714765141875*^9}}] }, Open ]] }, WindowSize->{1912, 1058}, WindowMargins->{{0, Automatic}, {Automatic, 0}}, Magnification->1.5, FrontEndVersion->"9.0 for Microsoft Windows (32-bit) (November 20, 2012)", StyleDefinitions->"Default.nb" ] (* End of Notebook Content *) (* Internal cache information *) (*CellTagsOutline CellTagsIndex->{ "Constructing an Expression"->{ Cell[35896, 933, 333, 5, 47, "ExerciseHeading", CellGroupingRules->{GroupTogetherGrouping, 10009.}, CellTags->{"Exercises", "Constructing an Expression"}], Cell[36232, 940, 677, 12, 74, "Text", CellGroupingRules->{GroupTogetherGrouping, 10009.}, CellTags->{"Exercises", "Constructing an Expression"}], Cell[36912, 954, 780, 16, 37, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10009.}, CellTags->{"Exercises", "Constructing an Expression"}], Cell[37695, 972, 379, 10, 45, "Input", CellGroupingRules->{GroupTogetherGrouping, 10009.}, CellTags->{"Exercises", "Constructing an Expression"}], Cell[38278, 989, 954, 13, 65, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10009.}, CellTags->{"Exercises", "Constructing an Expression"}], Cell[39235, 1004, 2994, 88, 154, "Input", CellGroupingRules->{GroupTogetherGrouping, 10009.}, CellTags->{"Exercises", "Constructing an Expression"}]}, "Creating Definitions"->{ Cell[1210, 36, 660, 19, 46, "Text", CellGroupingRules->{GroupTogetherGrouping, 10000.}, CellTags->{"Exercises", "Creating Definitions"}], Cell[2130, 64, 686, 22, 46, "Text", CellGroupingRules->{GroupTogetherGrouping, 10000.}, CellTags->{"Exercises", "Creating Definitions"}], Cell[3045, 94, 445, 9, 74, "Text", CellGroupingRules->{GroupTogetherGrouping, 10000.}, CellTags->{"Exercises", "Creating Definitions"}]}, "Debugging a Program"->{ Cell[60519, 1603, 364, 5, 47, "ExerciseHeading", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellTags->{"Exercises", "Debugging a Program"}], Cell[60886, 1610, 744, 10, 65, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellTags->{"Exercises", "Debugging a Program"}], Cell[61633, 1622, 1430, 38, 278, "Input", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellTags->{"Exercises", "Debugging a Program"}], Cell[63066, 1662, 845, 17, 37, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellTags->{"Exercises", "Debugging a Program"}], Cell[63914, 1681, 389, 12, 141, "Input", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellTags->{"Exercises", "Debugging a Program"}], Cell[64306, 1695, 665, 14, 37, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellTags->{"Exercises", "Debugging a Program"}]}, "Delayed Rules"->{ Cell[42583, 1106, 329, 5, 47, "ExerciseHeading", CellGroupingRules->{GroupTogetherGrouping, 10000.}, CellTags->{"Exercises", "Delayed Rules"}], Cell[42915, 1113, 639, 11, 45, "Text", CellGroupingRules->{GroupTogetherGrouping, 10000.}, CellTags->{"Exercises", "Delayed Rules"}], Cell[43557, 1126, 446, 12, 75, "Input", CellGroupingRules->{GroupTogetherGrouping, 10000.}, CellTags->{"Exercises", "Delayed Rules"}], Cell[44006, 1140, 347, 9, 45, "Input", CellGroupingRules->{GroupTogetherGrouping, 10000.}, CellTags->{"Exercises", "Delayed Rules"}], Cell[44568, 1156, 535, 9, 45, "Text", CellGroupingRules->{GroupTogetherGrouping, 10000.}, CellTags->{"Exercises", "Delayed Rules"}], Cell[45106, 1167, 1144, 24, 66, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10000.}, CellTags->{"Exercises", "Delayed Rules"}]}, "Exercises"->{ Cell[1210, 36, 660, 19, 46, "Text", CellGroupingRules->{GroupTogetherGrouping, 10000.}, CellTags->{"Exercises", "Creating Definitions"}], Cell[2130, 64, 686, 22, 46, "Text", CellGroupingRules->{GroupTogetherGrouping, 10000.}, CellTags->{"Exercises", "Creating Definitions"}], Cell[3045, 94, 445, 9, 74, "Text", CellGroupingRules->{GroupTogetherGrouping, 10000.}, CellTags->{"Exercises", "Creating Definitions"}], Cell[3527, 108, 688, 10, 47, "ExerciseHeading", CellGroupingRules->{GroupTogetherGrouping, 10001.}, CellTags->{"Exercises", "Table I"}], Cell[4218, 120, 987, 23, 75, "Text", CellGroupingRules->{GroupTogetherGrouping, 10001.}, CellTags->{"Exercises", "Table I"}], Cell[5208, 145, 393, 6, 36, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10001.}, CellTags->{"Exercises", "Table I"}], Cell[5604, 153, 420, 11, 45, "Input", CellGroupingRules->{GroupTogetherGrouping, 10001.}, CellTags->{"Exercises", "Table I"}], Cell[6027, 166, 490, 7, 36, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10001.}, CellTags->{"Exercises", "Table I"}], Cell[6699, 182, 345, 5, 47, "ExerciseHeading", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Table II"}], Cell[7047, 189, 704, 15, 46, "Text", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Table II"}], Cell[7754, 206, 468, 7, 36, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Table II"}], Cell[8225, 215, 427, 12, 45, "Input", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Table II"}], Cell[8655, 229, 398, 7, 45, "Text", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Table II"}], Cell[9056, 238, 244, 5, 45, "Input", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Table II"}], Cell[9303, 245, 520, 12, 46, "Text", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Table II"}], Cell[9826, 259, 301, 7, 45, "Input", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Table II"}], Cell[10130, 268, 514, 8, 36, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Table II"}], Cell[10832, 283, 779, 11, 36, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Table II"}], Cell[11838, 304, 317, 5, 47, "ExerciseHeading", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellTags->{"Exercises", "Matrix Operations"}], Cell[12158, 311, 433, 10, 45, "Text", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellTags->{"Exercises", "Matrix Operations"}], Cell[12594, 323, 345, 9, 45, "Input", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellTags->{"Exercises", "Matrix Operations"}], Cell[12942, 334, 507, 12, 46, "Text", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellTags->{"Exercises", "Matrix Operations"}], Cell[13452, 348, 252, 5, 45, "Input", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellTags->{"Exercises", "Matrix Operations"}], Cell[13707, 355, 594, 15, 37, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellTags->{"Exercises", "Matrix Operations"}], Cell[14504, 377, 595, 14, 37, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellTags->{"Exercises", "Matrix Operations"}], Cell[15302, 398, 584, 14, 37, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellTags->{"Exercises", "Matrix Operations"}], Cell[16088, 419, 694, 16, 37, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellTags->{"Exercises", "Matrix Operations"}], Cell[16984, 442, 661, 14, 37, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellTags->{"Exercises", "Matrix Operations"}], Cell[17879, 466, 379, 6, 47, "ExerciseHeading", CellGroupingRules->{GroupTogetherGrouping, 10004.}, CellTags->{"Exercises", "Picking Parts"}], Cell[18261, 474, 445, 9, 45, "Text", CellGroupingRules->{GroupTogetherGrouping, 10004.}, CellTags->{"Exercises", "Picking Parts"}], Cell[19270, 501, 996, 26, 104, "Text", CellGroupingRules->{GroupTogetherGrouping, 10004.}, CellTags->{"Exercises", "Picking Parts"}], Cell[20269, 529, 310, 7, 45, "Input", CellGroupingRules->{GroupTogetherGrouping, 10004.}, CellTags->{"Exercises", "Picking Parts"}], Cell[20582, 538, 345, 8, 45, "Input", CellGroupingRules->{GroupTogetherGrouping, 10004.}, CellTags->{"Exercises", "Picking Parts"}], Cell[20930, 548, 866, 16, 75, "Text", CellGroupingRules->{GroupTogetherGrouping, 10004.}, CellTags->{"Exercises", "Picking Parts"}], Cell[21799, 566, 333, 8, 45, "Input", CellGroupingRules->{GroupTogetherGrouping, 10004.}, CellTags->{"Exercises", "Picking Parts"}], Cell[22135, 576, 485, 11, 46, "Text", CellGroupingRules->{GroupTogetherGrouping, 10004.}, CellTags->{"Exercises", "Picking Parts"}], Cell[22623, 589, 402, 11, 45, "Input", CellGroupingRules->{GroupTogetherGrouping, 10004.}, CellTags->{"Exercises", "Picking Parts"}], Cell[23028, 602, 584, 9, 36, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10004.}, CellTags->{"Exercises", "Picking Parts"}], Cell[23841, 619, 462, 7, 36, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10004.}, CellTags->{"Exercises", "Picking Parts"}], Cell[24532, 634, 617, 9, 36, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10004.}, CellTags->{"Exercises", "Picking Parts"}], Cell[25338, 652, 385, 5, 47, "ExerciseHeading", CellGroupingRules->{GroupTogetherGrouping, 10005.}, CellTags->{"Exercises", "Immediate and Delayed"}], Cell[25726, 659, 432, 10, 46, "Text", CellGroupingRules->{GroupTogetherGrouping, 10005.}, CellTags->{"Exercises", "Immediate and Delayed"}], Cell[26161, 671, 360, 9, 47, "Input", CellGroupingRules->{GroupTogetherGrouping, 10005.}, CellTags->{"Exercises", "Immediate and Delayed"}], Cell[26524, 682, 649, 10, 36, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10005.}, CellTags->{"Exercises", "Immediate and Delayed"}], Cell[27402, 702, 364, 6, 47, "ExerciseHeading", CellGroupingRules->{GroupTogetherGrouping, 10006.}, CellTags->{"Exercises", "Localizing Variables"}], Cell[27769, 710, 718, 15, 37, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10006.}, CellTags->{"Exercises", "Localizing Variables"}], Cell[28490, 727, 629, 17, 133, "Input", CellGroupingRules->{GroupTogetherGrouping, 10006.}, CellTags->{"Exercises", "Localizing Variables"}], Cell[29122, 746, 221, 4, 32, "Solution", CellGroupingRules->{GroupTogetherGrouping, 10006.}, CellTags->{"Exercises", "Localizing Variables"}], Cell[29571, 760, 352, 5, 47, "ExerciseHeading", CellGroupingRules->{GroupTogetherGrouping, 10007.}, CellTags->{"Exercises", "Using Patterns"}], Cell[29926, 767, 1165, 29, 66, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10007.}, CellTags->{"Exercises", "Using Patterns"}], Cell[31094, 798, 1180, 33, 75, "Input", CellGroupingRules->{GroupTogetherGrouping, 10007.}, CellTags->{"Exercises", "Using Patterns"}], Cell[32277, 833, 1279, 29, 66, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10007.}, CellTags->{"Exercises", "Using Patterns"}], Cell[33738, 871, 346, 5, 47, "ExerciseHeading", CellGroupingRules->{GroupTogetherGrouping, 10008.}, CellTags->{"Exercises", "Pattern Matching"}], Cell[34087, 878, 1582, 45, 50, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10008.}, CellTags->{"Exercises", "Pattern Matching"}], Cell[35896, 933, 333, 5, 47, "ExerciseHeading", CellGroupingRules->{GroupTogetherGrouping, 10009.}, CellTags->{"Exercises", "Constructing an Expression"}], Cell[36232, 940, 677, 12, 74, "Text", CellGroupingRules->{GroupTogetherGrouping, 10009.}, CellTags->{"Exercises", "Constructing an Expression"}], Cell[36912, 954, 780, 16, 37, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10009.}, CellTags->{"Exercises", "Constructing an Expression"}], Cell[37695, 972, 379, 10, 45, "Input", CellGroupingRules->{GroupTogetherGrouping, 10009.}, CellTags->{"Exercises", "Constructing an Expression"}], Cell[38278, 989, 954, 13, 65, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10009.}, CellTags->{"Exercises", "Constructing an Expression"}], Cell[39235, 1004, 2994, 88, 154, "Input", CellGroupingRules->{GroupTogetherGrouping, 10009.}, CellTags->{"Exercises", "Constructing an Expression"}], Cell[42583, 1106, 329, 5, 47, "ExerciseHeading", CellGroupingRules->{GroupTogetherGrouping, 10000.}, CellTags->{"Exercises", "Delayed Rules"}], Cell[42915, 1113, 639, 11, 45, "Text", CellGroupingRules->{GroupTogetherGrouping, 10000.}, CellTags->{"Exercises", "Delayed Rules"}], Cell[43557, 1126, 446, 12, 75, "Input", CellGroupingRules->{GroupTogetherGrouping, 10000.}, CellTags->{"Exercises", "Delayed Rules"}], Cell[44006, 1140, 347, 9, 45, "Input", CellGroupingRules->{GroupTogetherGrouping, 10000.}, CellTags->{"Exercises", "Delayed Rules"}], Cell[44568, 1156, 535, 9, 45, "Text", CellGroupingRules->{GroupTogetherGrouping, 10000.}, CellTags->{"Exercises", "Delayed Rules"}], Cell[45106, 1167, 1144, 24, 66, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10000.}, CellTags->{"Exercises", "Delayed Rules"}], Cell[46491, 1201, 372, 5, 47, "ExerciseHeading", CellGroupingRules->{GroupTogetherGrouping, 10001.}, CellTags->{"Exercises", "Formatting Numbers"}], Cell[46866, 1208, 996, 19, 66, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10001.}, CellTags->{"Exercises", "Formatting Numbers"}], Cell[48090, 1236, 751, 22, 45, "Input", CellGroupingRules->{GroupTogetherGrouping, 10001.}, CellTags->{"Exercises", "Formatting Numbers"}], Cell[48844, 1260, 697, 20, 45, "Input", CellGroupingRules->{GroupTogetherGrouping, 10001.}, CellTags->{"Exercises", "Formatting Numbers"}], Cell[49544, 1282, 661, 9, 36, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10001.}, CellTags->{"Exercises", "Formatting Numbers"}], Cell[50208, 1293, 3689, 140, 291, "Output", CellGroupingRules->{GroupTogetherGrouping, 10001.}, CellTags->{"Exercises", "Formatting Numbers"}], Cell[54123, 1443, 319, 5, 47, "ExerciseHeading", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Programming Style"}], Cell[54445, 1450, 501, 8, 36, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Programming Style"}], Cell[54949, 1460, 609, 18, 45, "Input", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Programming Style"}], Cell[55561, 1480, 1043, 20, 66, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Programming Style"}], Cell[56607, 1502, 884, 24, 191, "Input", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Programming Style"}], Cell[57494, 1528, 430, 6, 36, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Programming Style"}], Cell[57927, 1536, 275, 6, 45, "Input", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Programming Style"}], Cell[58205, 1544, 440, 7, 36, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Programming Style"}], Cell[58648, 1553, 367, 10, 45, "Input", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Programming Style"}], Cell[59018, 1565, 614, 14, 37, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Programming Style"}], Cell[59823, 1586, 470, 7, 36, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Programming Style"}], Cell[60519, 1603, 364, 5, 47, "ExerciseHeading", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellTags->{"Exercises", "Debugging a Program"}], Cell[60886, 1610, 744, 10, 65, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellTags->{"Exercises", "Debugging a Program"}], Cell[61633, 1622, 1430, 38, 278, "Input", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellTags->{"Exercises", "Debugging a Program"}], Cell[63066, 1662, 845, 17, 37, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellTags->{"Exercises", "Debugging a Program"}], Cell[63914, 1681, 389, 12, 141, "Input", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellTags->{"Exercises", "Debugging a Program"}], Cell[64306, 1695, 665, 14, 37, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellTags->{"Exercises", "Debugging a Program"}], Cell[65218, 1722, 79, 1, 78, "SlideShowNavigationBar", CellTags->{"SlideShowHeader", "Exercises"}]}, "Formatting Numbers"->{ Cell[46491, 1201, 372, 5, 47, "ExerciseHeading", CellGroupingRules->{GroupTogetherGrouping, 10001.}, CellTags->{"Exercises", "Formatting Numbers"}], Cell[46866, 1208, 996, 19, 66, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10001.}, CellTags->{"Exercises", "Formatting Numbers"}], Cell[48090, 1236, 751, 22, 45, "Input", CellGroupingRules->{GroupTogetherGrouping, 10001.}, CellTags->{"Exercises", "Formatting Numbers"}], Cell[48844, 1260, 697, 20, 45, "Input", CellGroupingRules->{GroupTogetherGrouping, 10001.}, CellTags->{"Exercises", "Formatting Numbers"}], Cell[49544, 1282, 661, 9, 36, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10001.}, CellTags->{"Exercises", "Formatting Numbers"}], Cell[50208, 1293, 3689, 140, 291, "Output", CellGroupingRules->{GroupTogetherGrouping, 10001.}, CellTags->{"Exercises", "Formatting Numbers"}]}, "Immediate and Delayed"->{ Cell[25338, 652, 385, 5, 47, "ExerciseHeading", CellGroupingRules->{GroupTogetherGrouping, 10005.}, CellTags->{"Exercises", "Immediate and Delayed"}], Cell[25726, 659, 432, 10, 46, "Text", CellGroupingRules->{GroupTogetherGrouping, 10005.}, CellTags->{"Exercises", "Immediate and Delayed"}], Cell[26161, 671, 360, 9, 47, "Input", CellGroupingRules->{GroupTogetherGrouping, 10005.}, CellTags->{"Exercises", "Immediate and Delayed"}], Cell[26524, 682, 649, 10, 36, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10005.}, CellTags->{"Exercises", "Immediate and Delayed"}]}, "Localizing Variables"->{ Cell[27402, 702, 364, 6, 47, "ExerciseHeading", CellGroupingRules->{GroupTogetherGrouping, 10006.}, CellTags->{"Exercises", "Localizing Variables"}], Cell[27769, 710, 718, 15, 37, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10006.}, CellTags->{"Exercises", "Localizing Variables"}], Cell[28490, 727, 629, 17, 133, "Input", CellGroupingRules->{GroupTogetherGrouping, 10006.}, CellTags->{"Exercises", "Localizing Variables"}], Cell[29122, 746, 221, 4, 32, "Solution", CellGroupingRules->{GroupTogetherGrouping, 10006.}, CellTags->{"Exercises", "Localizing Variables"}]}, "Matrix Operations"->{ Cell[11838, 304, 317, 5, 47, "ExerciseHeading", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellTags->{"Exercises", "Matrix Operations"}], Cell[12158, 311, 433, 10, 45, "Text", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellTags->{"Exercises", "Matrix Operations"}], Cell[12594, 323, 345, 9, 45, "Input", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellTags->{"Exercises", "Matrix Operations"}], Cell[12942, 334, 507, 12, 46, "Text", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellTags->{"Exercises", "Matrix Operations"}], Cell[13452, 348, 252, 5, 45, "Input", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellTags->{"Exercises", "Matrix Operations"}], Cell[13707, 355, 594, 15, 37, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellTags->{"Exercises", "Matrix Operations"}], Cell[14504, 377, 595, 14, 37, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellTags->{"Exercises", "Matrix Operations"}], Cell[15302, 398, 584, 14, 37, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellTags->{"Exercises", "Matrix Operations"}], Cell[16088, 419, 694, 16, 37, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellTags->{"Exercises", "Matrix Operations"}], Cell[16984, 442, 661, 14, 37, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellTags->{"Exercises", "Matrix Operations"}]}, "Pattern Matching"->{ Cell[33738, 871, 346, 5, 47, "ExerciseHeading", CellGroupingRules->{GroupTogetherGrouping, 10008.}, CellTags->{"Exercises", "Pattern Matching"}], Cell[34087, 878, 1582, 45, 50, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10008.}, CellTags->{"Exercises", "Pattern Matching"}]}, "Picking Parts"->{ Cell[17879, 466, 379, 6, 47, "ExerciseHeading", CellGroupingRules->{GroupTogetherGrouping, 10004.}, CellTags->{"Exercises", "Picking Parts"}], Cell[18261, 474, 445, 9, 45, "Text", CellGroupingRules->{GroupTogetherGrouping, 10004.}, CellTags->{"Exercises", "Picking Parts"}], Cell[19270, 501, 996, 26, 104, "Text", CellGroupingRules->{GroupTogetherGrouping, 10004.}, CellTags->{"Exercises", "Picking Parts"}], Cell[20269, 529, 310, 7, 45, "Input", CellGroupingRules->{GroupTogetherGrouping, 10004.}, CellTags->{"Exercises", "Picking Parts"}], Cell[20582, 538, 345, 8, 45, "Input", CellGroupingRules->{GroupTogetherGrouping, 10004.}, CellTags->{"Exercises", "Picking Parts"}], Cell[20930, 548, 866, 16, 75, "Text", CellGroupingRules->{GroupTogetherGrouping, 10004.}, CellTags->{"Exercises", "Picking Parts"}], Cell[21799, 566, 333, 8, 45, "Input", CellGroupingRules->{GroupTogetherGrouping, 10004.}, CellTags->{"Exercises", "Picking Parts"}], Cell[22135, 576, 485, 11, 46, "Text", CellGroupingRules->{GroupTogetherGrouping, 10004.}, CellTags->{"Exercises", "Picking Parts"}], Cell[22623, 589, 402, 11, 45, "Input", CellGroupingRules->{GroupTogetherGrouping, 10004.}, CellTags->{"Exercises", "Picking Parts"}], Cell[23028, 602, 584, 9, 36, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10004.}, CellTags->{"Exercises", "Picking Parts"}], Cell[23841, 619, 462, 7, 36, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10004.}, CellTags->{"Exercises", "Picking Parts"}], Cell[24532, 634, 617, 9, 36, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10004.}, CellTags->{"Exercises", "Picking Parts"}]}, "Programming Style"->{ Cell[54123, 1443, 319, 5, 47, "ExerciseHeading", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Programming Style"}], Cell[54445, 1450, 501, 8, 36, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Programming Style"}], Cell[54949, 1460, 609, 18, 45, "Input", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Programming Style"}], Cell[55561, 1480, 1043, 20, 66, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Programming Style"}], Cell[56607, 1502, 884, 24, 191, "Input", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Programming Style"}], Cell[57494, 1528, 430, 6, 36, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Programming Style"}], Cell[57927, 1536, 275, 6, 45, "Input", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Programming Style"}], Cell[58205, 1544, 440, 7, 36, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Programming Style"}], Cell[58648, 1553, 367, 10, 45, "Input", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Programming Style"}], Cell[59018, 1565, 614, 14, 37, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Programming Style"}], Cell[59823, 1586, 470, 7, 36, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Programming Style"}]}, "SlideShowHeader"->{ Cell[65218, 1722, 79, 1, 78, "SlideShowNavigationBar", CellTags->{"SlideShowHeader", "Exercises"}]}, "Table I"->{ Cell[3527, 108, 688, 10, 47, "ExerciseHeading", CellGroupingRules->{GroupTogetherGrouping, 10001.}, CellTags->{"Exercises", "Table I"}], Cell[4218, 120, 987, 23, 75, "Text", CellGroupingRules->{GroupTogetherGrouping, 10001.}, CellTags->{"Exercises", "Table I"}], Cell[5208, 145, 393, 6, 36, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10001.}, CellTags->{"Exercises", "Table I"}], Cell[5604, 153, 420, 11, 45, "Input", CellGroupingRules->{GroupTogetherGrouping, 10001.}, CellTags->{"Exercises", "Table I"}], Cell[6027, 166, 490, 7, 36, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10001.}, CellTags->{"Exercises", "Table I"}]}, "Table II"->{ Cell[6699, 182, 345, 5, 47, "ExerciseHeading", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Table II"}], Cell[7047, 189, 704, 15, 46, "Text", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Table II"}], Cell[7754, 206, 468, 7, 36, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Table II"}], Cell[8225, 215, 427, 12, 45, "Input", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Table II"}], Cell[8655, 229, 398, 7, 45, "Text", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Table II"}], Cell[9056, 238, 244, 5, 45, "Input", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Table II"}], Cell[9303, 245, 520, 12, 46, "Text", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Table II"}], Cell[9826, 259, 301, 7, 45, "Input", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Table II"}], Cell[10130, 268, 514, 8, 36, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Table II"}], Cell[10832, 283, 779, 11, 36, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Table II"}]}, "Using Patterns"->{ Cell[29571, 760, 352, 5, 47, "ExerciseHeading", CellGroupingRules->{GroupTogetherGrouping, 10007.}, CellTags->{"Exercises", "Using Patterns"}], Cell[29926, 767, 1165, 29, 66, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10007.}, CellTags->{"Exercises", "Using Patterns"}], Cell[31094, 798, 1180, 33, 75, "Input", CellGroupingRules->{GroupTogetherGrouping, 10007.}, CellTags->{"Exercises", "Using Patterns"}], Cell[32277, 833, 1279, 29, 66, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10007.}, CellTags->{"Exercises", "Using Patterns"}]} } *) (*CellTagsIndex CellTagsIndex->{ {"Constructing an Expression", 66420, 1760}, {"Creating Definitions", 67395, 1779}, {"Debugging a Program", 67859, 1789}, {"Delayed Rules", 68795, 1808}, {"Exercises", 69679, 1827}, {"Formatting Numbers", 82889, 2097}, {"Immediate and Delayed", 83824, 2116}, {"Localizing Variables", 84462, 2129}, {"Matrix Operations", 85098, 2142}, {"Pattern Matching", 86602, 2173}, {"Picking Parts", 86926, 2180}, {"Programming Style", 88663, 2217}, {"SlideShowHeader", 90327, 2251}, {"Table I", 90447, 2254}, {"Table II", 91151, 2270}, {"Using Patterns", 92545, 2301} } *) (*NotebookFileOutline Notebook[{ Cell[CellGroupData[{ Cell[579, 22, 259, 3, 77, "Subsection"], Cell[CellGroupData[{ Cell[863, 29, 344, 5, 65, "Subsection", CellGroupingRules->{GroupTogetherGrouping, 10000.}], Cell[1210, 36, 660, 19, 46, "Text", CellGroupingRules->{GroupTogetherGrouping, 10000.}, CellTags->{"Exercises", "Creating Definitions"}], Cell[1873, 57, 254, 5, 44, "Text", CellGroupingRules->{GroupTogetherGrouping, 10000.}], Cell[2130, 64, 686, 22, 46, "Text", CellGroupingRules->{GroupTogetherGrouping, 10000.}, CellTags->{"Exercises", "Creating Definitions"}], Cell[2819, 88, 223, 4, 45, "Text", CellGroupingRules->{GroupTogetherGrouping, 10000.}], Cell[3045, 94, 445, 9, 74, "Text", CellGroupingRules->{GroupTogetherGrouping, 10000.}, CellTags->{"Exercises", "Creating Definitions"}] }, Open ]], Cell[CellGroupData[{ Cell[3527, 108, 688, 10, 47, "ExerciseHeading", CellGroupingRules->{GroupTogetherGrouping, 10001.}, CellTags->{"Exercises", "Table I"}], Cell[4218, 120, 987, 23, 75, "Text", CellGroupingRules->{GroupTogetherGrouping, 10001.}, CellTags->{"Exercises", "Table I"}], Cell[5208, 145, 393, 6, 36, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10001.}, CellTags->{"Exercises", "Table I"}], Cell[5604, 153, 420, 11, 45, "Input", CellGroupingRules->{GroupTogetherGrouping, 10001.}, CellTags->{"Exercises", "Table I"}], Cell[6027, 166, 490, 7, 36, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10001.}, CellTags->{"Exercises", "Table I"}], Cell[6520, 175, 142, 2, 32, "NonPrintButton", CellGroupingRules->{GroupTogetherGrouping, 10001.}] }, Open ]], Cell[CellGroupData[{ Cell[6699, 182, 345, 5, 47, "ExerciseHeading", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Table II"}], Cell[7047, 189, 704, 15, 46, "Text", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Table II"}], Cell[7754, 206, 468, 7, 36, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Table II"}], Cell[8225, 215, 427, 12, 45, "Input", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Table II"}], Cell[8655, 229, 398, 7, 45, "Text", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Table II"}], Cell[9056, 238, 244, 5, 45, "Input", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Table II"}], Cell[9303, 245, 520, 12, 46, "Text", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Table II"}], Cell[9826, 259, 301, 7, 45, "Input", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Table II"}], Cell[10130, 268, 514, 8, 36, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Table II"}], Cell[10647, 278, 182, 3, 32, "NonPrintButton", CellGroupingRules->{GroupTogetherGrouping, 10002.}], Cell[10832, 283, 779, 11, 36, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Table II"}], Cell[11614, 296, 187, 3, 32, "NonPrintButton", CellGroupingRules->{GroupTogetherGrouping, 10002.}] }, Open ]], Cell[CellGroupData[{ Cell[11838, 304, 317, 5, 47, "ExerciseHeading", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellTags->{"Exercises", "Matrix Operations"}], Cell[12158, 311, 433, 10, 45, "Text", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellTags->{"Exercises", "Matrix Operations"}], Cell[12594, 323, 345, 9, 45, "Input", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellTags->{"Exercises", "Matrix Operations"}], Cell[12942, 334, 507, 12, 46, "Text", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellTags->{"Exercises", "Matrix Operations"}], Cell[13452, 348, 252, 5, 45, "Input", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellTags->{"Exercises", "Matrix Operations"}], Cell[13707, 355, 594, 15, 37, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellTags->{"Exercises", "Matrix Operations"}], Cell[14304, 372, 197, 3, 32, "NonPrintButton", CellGroupingRules->{GroupTogetherGrouping, 10003.}], Cell[14504, 377, 595, 14, 37, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellTags->{"Exercises", "Matrix Operations"}], Cell[15102, 393, 197, 3, 32, "NonPrintButton", CellGroupingRules->{GroupTogetherGrouping, 10003.}], Cell[15302, 398, 584, 14, 37, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellTags->{"Exercises", "Matrix Operations"}], Cell[15889, 414, 196, 3, 32, "NonPrintButton", CellGroupingRules->{GroupTogetherGrouping, 10003.}], Cell[16088, 419, 694, 16, 37, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellTags->{"Exercises", "Matrix Operations"}], Cell[16785, 437, 196, 3, 32, "NonPrintButton", CellGroupingRules->{GroupTogetherGrouping, 10003.}], Cell[16984, 442, 661, 14, 37, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellTags->{"Exercises", "Matrix Operations"}], Cell[17648, 458, 194, 3, 32, "NonPrintButton", CellGroupingRules->{GroupTogetherGrouping, 10003.}] }, Open ]], Cell[CellGroupData[{ Cell[17879, 466, 379, 6, 47, "ExerciseHeading", CellGroupingRules->{GroupTogetherGrouping, 10004.}, CellTags->{"Exercises", "Picking Parts"}], Cell[18261, 474, 445, 9, 45, "Text", CellGroupingRules->{GroupTogetherGrouping, 10004.}, CellTags->{"Exercises", "Picking Parts"}], Cell[18709, 485, 558, 14, 104, "Input", CellGroupingRules->{GroupTogetherGrouping, 10004.}], Cell[19270, 501, 996, 26, 104, "Text", CellGroupingRules->{GroupTogetherGrouping, 10004.}, CellTags->{"Exercises", "Picking Parts"}], Cell[20269, 529, 310, 7, 45, "Input", CellGroupingRules->{GroupTogetherGrouping, 10004.}, CellTags->{"Exercises", "Picking Parts"}], Cell[20582, 538, 345, 8, 45, "Input", CellGroupingRules->{GroupTogetherGrouping, 10004.}, CellTags->{"Exercises", "Picking Parts"}], Cell[20930, 548, 866, 16, 75, "Text", CellGroupingRules->{GroupTogetherGrouping, 10004.}, CellTags->{"Exercises", "Picking Parts"}], Cell[21799, 566, 333, 8, 45, "Input", CellGroupingRules->{GroupTogetherGrouping, 10004.}, CellTags->{"Exercises", "Picking Parts"}], Cell[22135, 576, 485, 11, 46, "Text", CellGroupingRules->{GroupTogetherGrouping, 10004.}, CellTags->{"Exercises", "Picking Parts"}], Cell[22623, 589, 402, 11, 45, "Input", CellGroupingRules->{GroupTogetherGrouping, 10004.}, CellTags->{"Exercises", "Picking Parts"}], Cell[23028, 602, 584, 9, 36, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10004.}, CellTags->{"Exercises", "Picking Parts"}], Cell[23615, 613, 223, 4, 32, "NonPrintButton", CellGroupingRules->{GroupTogetherGrouping, 10004.}], Cell[23841, 619, 462, 7, 36, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10004.}, CellTags->{"Exercises", "Picking Parts"}], Cell[24306, 628, 223, 4, 32, "NonPrintButton", CellGroupingRules->{GroupTogetherGrouping, 10004.}], Cell[24532, 634, 617, 9, 36, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10004.}, CellTags->{"Exercises", "Picking Parts"}], Cell[25152, 645, 149, 2, 32, "NonPrintButton", CellGroupingRules->{GroupTogetherGrouping, 10004.}] }, Open ]], Cell[CellGroupData[{ Cell[25338, 652, 385, 5, 47, "ExerciseHeading", CellGroupingRules->{GroupTogetherGrouping, 10005.}, CellTags->{"Exercises", "Immediate and Delayed"}], Cell[25726, 659, 432, 10, 46, "Text", CellGroupingRules->{GroupTogetherGrouping, 10005.}, CellTags->{"Exercises", "Immediate and Delayed"}], Cell[26161, 671, 360, 9, 47, "Input", CellGroupingRules->{GroupTogetherGrouping, 10005.}, CellTags->{"Exercises", "Immediate and Delayed"}], Cell[26524, 682, 649, 10, 36, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10005.}, CellTags->{"Exercises", "Immediate and Delayed"}], Cell[27176, 694, 189, 3, 32, "NonPrintButton", CellGroupingRules->{GroupTogetherGrouping, 10005.}] }, Open ]], Cell[CellGroupData[{ Cell[27402, 702, 364, 6, 47, "ExerciseHeading", CellGroupingRules->{GroupTogetherGrouping, 10006.}, CellTags->{"Exercises", "Localizing Variables"}], Cell[27769, 710, 718, 15, 37, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10006.}, CellTags->{"Exercises", "Localizing Variables"}], Cell[28490, 727, 629, 17, 133, "Input", CellGroupingRules->{GroupTogetherGrouping, 10006.}, CellTags->{"Exercises", "Localizing Variables"}], Cell[29122, 746, 221, 4, 32, "Solution", CellGroupingRules->{GroupTogetherGrouping, 10006.}, CellTags->{"Exercises", "Localizing Variables"}], Cell[29346, 752, 188, 3, 32, "NonPrintButton", CellGroupingRules->{GroupTogetherGrouping, 10006.}] }, Open ]], Cell[CellGroupData[{ Cell[29571, 760, 352, 5, 47, "ExerciseHeading", CellGroupingRules->{GroupTogetherGrouping, 10007.}, CellTags->{"Exercises", "Using Patterns"}], Cell[29926, 767, 1165, 29, 66, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10007.}, CellTags->{"Exercises", "Using Patterns"}], Cell[31094, 798, 1180, 33, 75, "Input", CellGroupingRules->{GroupTogetherGrouping, 10007.}, CellTags->{"Exercises", "Using Patterns"}], Cell[32277, 833, 1279, 29, 66, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10007.}, CellTags->{"Exercises", "Using Patterns"}], Cell[33559, 864, 142, 2, 32, "NonPrintButton", CellGroupingRules->{GroupTogetherGrouping, 10007.}] }, Open ]], Cell[CellGroupData[{ Cell[33738, 871, 346, 5, 47, "ExerciseHeading", CellGroupingRules->{GroupTogetherGrouping, 10008.}, CellTags->{"Exercises", "Pattern Matching"}], Cell[34087, 878, 1582, 45, 50, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10008.}, CellTags->{"Exercises", "Pattern Matching"}], Cell[35672, 925, 187, 3, 32, "NonPrintButton", CellGroupingRules->{GroupTogetherGrouping, 10008.}] }, Open ]], Cell[CellGroupData[{ Cell[35896, 933, 333, 5, 47, "ExerciseHeading", CellGroupingRules->{GroupTogetherGrouping, 10009.}, CellTags->{"Exercises", "Constructing an Expression"}], Cell[36232, 940, 677, 12, 74, "Text", CellGroupingRules->{GroupTogetherGrouping, 10009.}, CellTags->{"Exercises", "Constructing an Expression"}], Cell[36912, 954, 780, 16, 37, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10009.}, CellTags->{"Exercises", "Constructing an Expression"}], Cell[37695, 972, 379, 10, 45, "Input", CellGroupingRules->{GroupTogetherGrouping, 10009.}, CellTags->{"Exercises", "Constructing an Expression"}], Cell[38077, 984, 198, 3, 32, "NonPrintButton", CellGroupingRules->{GroupTogetherGrouping, 10009.}], Cell[38278, 989, 954, 13, 65, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10009.}, CellTags->{"Exercises", "Constructing an Expression"}], Cell[39235, 1004, 2994, 88, 154, "Input", CellGroupingRules->{GroupTogetherGrouping, 10009.}, CellTags->{"Exercises", "Constructing an Expression"}], Cell[42232, 1094, 189, 3, 32, "NonPrintButton", CellGroupingRules->{GroupTogetherGrouping, 10009.}] }, Open ]], Cell[42436, 1100, 122, 2, 32, "NonPrintButton"], Cell[CellGroupData[{ Cell[42583, 1106, 329, 5, 47, "ExerciseHeading", CellGroupingRules->{GroupTogetherGrouping, 10000.}, CellTags->{"Exercises", "Delayed Rules"}], Cell[42915, 1113, 639, 11, 45, "Text", CellGroupingRules->{GroupTogetherGrouping, 10000.}, CellTags->{"Exercises", "Delayed Rules"}], Cell[43557, 1126, 446, 12, 75, "Input", CellGroupingRules->{GroupTogetherGrouping, 10000.}, CellTags->{"Exercises", "Delayed Rules"}], Cell[44006, 1140, 347, 9, 45, "Input", CellGroupingRules->{GroupTogetherGrouping, 10000.}, CellTags->{"Exercises", "Delayed Rules"}], Cell[44356, 1151, 209, 3, 45, "Text", CellGroupingRules->{GroupTogetherGrouping, 10000.}], Cell[44568, 1156, 535, 9, 45, "Text", CellGroupingRules->{GroupTogetherGrouping, 10000.}, CellTags->{"Exercises", "Delayed Rules"}], Cell[45106, 1167, 1144, 24, 66, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10000.}, CellTags->{"Exercises", "Delayed Rules"}], Cell[46253, 1193, 201, 3, 32, "NonPrintButton", CellGroupingRules->{GroupTogetherGrouping, 10000.}] }, Open ]], Cell[CellGroupData[{ Cell[46491, 1201, 372, 5, 47, "ExerciseHeading", CellGroupingRules->{GroupTogetherGrouping, 10001.}, CellTags->{"Exercises", "Formatting Numbers"}], Cell[46866, 1208, 996, 19, 66, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10001.}, CellTags->{"Exercises", "Formatting Numbers"}], Cell[47865, 1229, 222, 5, 45, "Input", CellGroupingRules->{GroupTogetherGrouping, 10001.}], Cell[48090, 1236, 751, 22, 45, "Input", CellGroupingRules->{GroupTogetherGrouping, 10001.}, CellTags->{"Exercises", "Formatting Numbers"}], Cell[48844, 1260, 697, 20, 45, "Input", CellGroupingRules->{GroupTogetherGrouping, 10001.}, CellTags->{"Exercises", "Formatting Numbers"}], Cell[49544, 1282, 661, 9, 36, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10001.}, CellTags->{"Exercises", "Formatting Numbers"}], Cell[50208, 1293, 3689, 140, 291, "Output", CellGroupingRules->{GroupTogetherGrouping, 10001.}, CellTags->{"Exercises", "Formatting Numbers"}], Cell[53900, 1435, 186, 3, 32, "NonPrintButton", CellGroupingRules->{GroupTogetherGrouping, 10001.}] }, Open ]], Cell[CellGroupData[{ Cell[54123, 1443, 319, 5, 47, "ExerciseHeading", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Programming Style"}], Cell[54445, 1450, 501, 8, 36, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Programming Style"}], Cell[54949, 1460, 609, 18, 45, "Input", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Programming Style"}], Cell[55561, 1480, 1043, 20, 66, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Programming Style"}], Cell[56607, 1502, 884, 24, 191, "Input", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Programming Style"}], Cell[57494, 1528, 430, 6, 36, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Programming Style"}], Cell[57927, 1536, 275, 6, 45, "Input", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Programming Style"}], Cell[58205, 1544, 440, 7, 36, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Programming Style"}], Cell[58648, 1553, 367, 10, 45, "Input", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Programming Style"}], Cell[59018, 1565, 614, 14, 37, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Programming Style"}], Cell[59635, 1581, 185, 3, 32, "NonPrintButton", CellGroupingRules->{GroupTogetherGrouping, 10002.}], Cell[59823, 1586, 470, 7, 36, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10002.}, CellTags->{"Exercises", "Programming Style"}], Cell[60296, 1595, 186, 3, 32, "NonPrintButton", CellGroupingRules->{GroupTogetherGrouping, 10002.}] }, Open ]], Cell[CellGroupData[{ Cell[60519, 1603, 364, 5, 47, "ExerciseHeading", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellTags->{"Exercises", "Debugging a Program"}], Cell[60886, 1610, 744, 10, 65, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellTags->{"Exercises", "Debugging a Program"}], Cell[61633, 1622, 1430, 38, 278, "Input", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellTags->{"Exercises", "Debugging a Program"}], Cell[63066, 1662, 845, 17, 37, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellTags->{"Exercises", "Debugging a Program"}], Cell[63914, 1681, 389, 12, 141, "Input", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellTags->{"Exercises", "Debugging a Program"}], Cell[64306, 1695, 665, 14, 37, "Exercise", CellGroupingRules->{GroupTogetherGrouping, 10003.}, CellTags->{"Exercises", "Debugging a Program"}] }, Open ]], Cell[64986, 1712, 112, 2, 32, "NonPrintButton"], Cell[65101, 1716, 80, 1, 32, "Spacer"] }, Open ]], Cell[CellGroupData[{ Cell[65218, 1722, 79, 1, 78, "SlideShowNavigationBar", CellTags->{"SlideShowHeader", "Exercises"}], Cell[65300, 1725, 228, 3, 59, "NonPrintSection"], Cell[65531, 1730, 154, 3, 45, "Input"], Cell[65688, 1735, 290, 8, 32, "NonPrintInput", InitializationCell->True], Cell[65981, 1745, 90, 1, 45, "Input"] }, Open ]] } ] *) (* End of internal cache information *)