(* Content-type: application/vnd.wolfram.mathematica *)

(*** Wolfram Notebook File ***)
(* http://www.wolfram.com/nb *)

(* CreatedBy='Mathematica 13.0' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       158,          7]
NotebookDataLength[     62141,       1503]
NotebookOptionsPosition[     57758,       1427]
NotebookOutlinePosition[     58166,       1443]
CellTagsIndexPosition[     58123,       1440]
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{

Cell[CellGroupData[{
Cell["Matice a grafick\[EAcute] objekty (2D a 3D grafy) - dial\[OAcute]gov\
\[EAcute] okn\[AAcute]", "Title",
 CellChangeTimes->{{3.862127063076151*^9, 3.8621270890207396`*^9}},
 TextAlignment->Center,ExpressionUUID->"25e871ca-2021-476b-8df5-22273f72d0cb"],

Cell[BoxData[
 RowBox[{"Tento", " ", "notebook", " ", "sl\[UAcute]\[ZHacek]i", " ", "ako", 
  " ", "grafick\[EAcute]", " ", "precvi\[CHacek]ovanie", " ", "pr\[AAcute]ce",
   " ", "s", " ", "grafick\[YAcute]mi", " ", "objektami", " ", "pomocou", " ",
   "dialogov\[YAcute]ch", " ", 
  RowBox[{"okien", "."}]}]], "Input",
 CellChangeTimes->{{3.8621271100468674`*^9, 3.8621271355807495`*^9}},
 TextAlignment->Center,ExpressionUUID->"11d4116f-f89c-443c-b667-1ae964c98f69"],

Cell[BoxData[
 RowBox[{"V", " ", "tomto", " ", "notebooku", " ", "si", " ", 
  "pou\[ZHacek]\[IAcute]vate\:013e", " ", 
  RowBox[{"precvi\[CHacek]\[IAcute]", ":"}]}]], "Input",
 CellChangeTimes->{{3.862127141182828*^9, 
  3.8621271411838384`*^9}},ExpressionUUID->"39e08487-a331-4e1e-bc66-\
6fd750458b9b"],

Cell[BoxData[
 StyleBox[
  RowBox[{"\[Bullet]", " ", "Matice", " ", 
   RowBox[{
    RowBox[{"(", 
     RowBox[{
     "S\[CHacek]\[IAcute]tanie", ",", " ", "od\[CHacek]\[IAcute]tanie", ",", 
      " ", "n\[AAcute]sobenie", ",", " ", "delenie"}], ")"}], ".", "\n", 
    "\[Bullet]"}], " ", "Pr\[AAcute]cu", " ", "s", " ", "2", "D", " ", 
   "grafmi", " ", "pomocou", " ", "interakt\[IAcute]vn\[EAcute]ho", " ", 
   RowBox[{"grafu", ".", "\n", "\[Bullet]"}], " ", "Pr\[AAcute]cu", " ", "s", 
   " ", "3", "D", " ", "grafmi", " ", "pomocou", " ", 
   "interakt\[IAcute]vn\[EAcute]ho", " ", 
   RowBox[{"grafu", ".", "\n"}]}],
  FontWeight->"Bold"]], "Input",
 CellChangeTimes->{{3.8621271470597672`*^9, 
  3.8621272003157654`*^9}},ExpressionUUID->"ad23d50b-fcd8-4fe4-ae93-\
7bf9382f71f8"],

Cell[BoxData[
 StyleBox[
  RowBox[{
   RowBox[{
    StyleBox["Autor",
     FontWeight->"Bold"], 
    StyleBox[" ",
     FontWeight->"Bold"], 
    StyleBox[
     RowBox[{"notebooku", 
      StyleBox[":",
       FontWeight->"Bold"]}],
     FontWeight->"Bold"], 
    StyleBox[" ",
     FontWeight->"Bold"], 
    StyleBox["Matej",
     FontWeight->"Plain",
     FontSlant->"Italic"], 
    StyleBox[" ",
     FontWeight->"Plain",
     FontSlant->"Italic"], 
    StyleBox["Baco",
     FontWeight->"Plain",
     FontSlant->"Italic"], 
    StyleBox[" ",
     FontWeight->"Plain",
     FontSlant->"Italic"], 
    StyleBox["SWI",
     FontWeight->"Plain",
     FontSlant->"Italic"]}], 
   StyleBox[" ",
    FontWeight->"Bold"], 
   StyleBox[",",
    FontWeight->"Bold"], 
   StyleBox[" ",
    FontWeight->"Bold"], 
   StyleBox["2022",
    FontWeight->"Bold"]}],
  FontFamily->"Consolas",
  FontSize->12]], "Input",
 TextAlignment->Right,ExpressionUUID->"286a3ab2-ed93-4b89-814b-96a4acf47d9e"],

Cell[" ", "Text",
 Editable->False,
 Selectable->False,
 CellFrame->{{0, 0}, {0, 3}},
 ShowCellBracket->False,
 CellMargins->{{0, 0}, {1, 1}},
 CellElementSpacings->{"CellMinHeight"->1},
 CellFrameMargins->0,
 CellFrameColor->GrayLevel[0.75],
 CellSize->{
  Inherited, 5},ExpressionUUID->"89f92b63-3d65-4ea0-ac48-c8b866a09a3c"],

Cell[CellGroupData[{

Cell[BoxData[
 StyleBox[
  RowBox[{
  "Dial\[OAcute]gov\[EAcute]", " ", "okno", " ", "na", " ", 
   "precvi\[CHacek]enie", " ", "s\[CHacek]\[IAcute]tania", " ", "matic"}],
  FontWeight->"Bold"]], "Input",
 CellChangeTimes->{{3.8621273155678644`*^9, 3.8621273193564177`*^9}},
 TextAlignment->Center,
 Background->GrayLevel[
  0.85],ExpressionUUID->"56df8897-3d45-4969-bc9b-4e5294a0c126"],

Cell[BoxData[
 TagBox[
  StyleBox[
   DynamicModuleBox[{$CellContext`mat1$$ = {{10, 5, -8, -8, 6}, {-2, -9, -7, 
    6, -3}, {2, 7, 4, -4, 7}, {-6, 7, -1, -5, 9}, {3, 3, 2, 
    3, -4}}, $CellContext`mat2$$ = {{6, 10, 4, 8, -5}, {0, 2, 7, 
    5, -4}, {-9, -9, 0, -3, 1}, {-4, -2, -10, 4, -10}, {9, 3, 10, 8, 
    7}}, $CellContext`riadok$$ = 2, $CellContext`stlpec$$ = 2, 
    Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, 
    Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 
    1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{{
       Hold[$CellContext`riadok$$], 3, "Po\[CHacek]et riadkov: "}, {1, 2, 3, 
      4, 5}}, {{
       Hold[$CellContext`stlpec$$], 3, "Po\[CHacek]et stlpcov: "}, {1, 2, 3, 
      4, 5}}, {
      Hold[
       Row[{
         Spacer[15], 
         Manipulate`Place[1], 
         Manipulate`Place[2], 
         Button["Vygenerova\[THacek] matice", $CellContext`mat1$$ = Table[
             RandomInteger[{-10, 10}], {5}, {5}]; $CellContext`mat2$$ = Table[
             RandomInteger[{-10, 10}], {5}, {5}]]}, 
        Spacer[15]]], Manipulate`Dump`ThisIsNotAControl}, {{
       Hold[$CellContext`mat1$$], {{-3, -10, -10, 5, -3}, {4, -8, -1, -4, 
       3}, {5, -4, 5, -4, -4}, {2, -5, -1, 1, 0}, {3, 1, -2, -9, 8}}}}, {{
       Hold[$CellContext`mat2$$], {{-9, -5, -5, 10, 9}, {1, -2, 3, 
       0, -6}, {-2, -2, -5, -9, 9}, {-2, 9, 1, -9, 9}, {7, -3, 4, -1, 0}}}}}, 
    Typeset`size$$ = {500., {247.13403309800196`, 252.86596690199804`}}, 
    Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = True}, 
    DynamicBox[Manipulate`ManipulateBoxes[
     2, StandardForm, 
      "Variables" :> {$CellContext`mat1$$ = {{-3, -10, -10, 5, -3}, {
         4, -8, -1, -4, 3}, {5, -4, 5, -4, -4}, {2, -5, -1, 1, 0}, {3, 
         1, -2, -9, 8}}, $CellContext`mat2$$ = {{-9, -5, -5, 10, 9}, {1, -2, 
         3, 0, -6}, {-2, -2, -5, -9, 9}, {-2, 9, 1, -9, 9}, {7, -3, 4, -1, 
         0}}, $CellContext`riadok$$ = 3, $CellContext`stlpec$$ = 3}, 
      "ControllerVariables" :> {}, 
      "OtherVariables" :> {
       Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, 
        Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, 
        Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
         Typeset`skipInitDone$$}, 
      "Body" :> ($CellContext`maticaA = 
        Take[$CellContext`mat1$$, {1, $CellContext`riadok$$}, {
          1, $CellContext`stlpec$$}]; $CellContext`maticaB = 
        Take[$CellContext`mat2$$, {1, $CellContext`riadok$$}, {
          1, $CellContext`stlpec$$}]; Pane[
         Column[{
           Row[{
             MatrixForm[{
               
               Grid[$CellContext`maticaA, Alignment -> Right, 
                Spacings -> {1, 1}]}], "   ", " + ", "   ", 
             MatrixForm[{
               
               Grid[$CellContext`maticaB, Alignment -> Right, 
                Spacings -> {1, 1}]}]}], "   ", " = ", "   ", 
           MatrixForm[{
             
             Grid[$CellContext`maticaA + $CellContext`maticaB, 
              Alignment -> {Right, Bottom}, Spacings -> {1, 1}]}]}, Alignment -> 
          Center], ImageSize -> {500, 500}, Alignment -> {Center, Center}]), 
      "Specifications" :> {{{$CellContext`riadok$$, 3, 
          "Po\[CHacek]et riadkov: "}, {1, 2, 3, 4, 5}, ControlType -> Setter, 
         ControlPlacement -> 
         1}, {{$CellContext`stlpec$$, 3, "Po\[CHacek]et stlpcov: "}, {1, 2, 3,
          4, 5}, ControlType -> Setter, ControlPlacement -> 2}, 
        Row[{
          Spacer[15], 
          Manipulate`Place[1], 
          Manipulate`Place[2], 
          Button["Vygenerova\[THacek] matice", $CellContext`mat1$$ = Table[
              RandomInteger[{-10, 10}], {5}, {5}]; $CellContext`mat2$$ = Table[
              RandomInteger[{-10, 10}], {5}, {5}]]}, 
         Spacer[
         15]], {{$CellContext`mat1$$, {{-3, -10, -10, 5, -3}, {4, -8, -1, -4, 
          3}, {5, -4, 5, -4, -4}, {2, -5, -1, 1, 0}, {3, 1, -2, -9, 8}}}, 
         ControlType -> 
         None}, {{$CellContext`mat2$$, {{-9, -5, -5, 10, 9}, {1, -2, 3, 
          0, -6}, {-2, -2, -5, -9, 9}, {-2, 9, 1, -9, 9}, {7, -3, 4, -1, 0}}},
          ControlType -> None}}, 
      "Options" :> {ControlPlacement -> Top, AutorunSequencing -> {1, 2, 3}}, 
      "DefaultOptions" :> {}],
     ImageSizeCache->{550., {295.13403309800196`, 300.86596690199804`}},
     SingleEvaluation->True],
    Deinitialization:>None,
    DynamicModuleValues:>{},
    SynchronousInitialization->True,
    UndoTrackedVariables:>{Typeset`show$$, Typeset`bookmarkMode$$},
    UnsavedVariables:>{Typeset`initDone$$},
    UntrackedVariables:>{Typeset`size$$}], "Manipulate",
   Deployed->True,
   StripOnInput->False],
  Manipulate`InterpretManipulate[1]]], "Output",
 CellChangeTimes->{3.8621273459472666`*^9},
 TextAlignment->Center,
 Background->RGBColor[1, 0.9, 0.8],
 CellLabel->"Out[34]=",ExpressionUUID->"edb59e2e-8526-4e7b-9a9b-1844d942c518"]
}, Open  ]],

Cell[" ", "Text",
 Editable->False,
 Selectable->False,
 CellFrame->{{0, 0}, {0, 3}},
 ShowCellBracket->False,
 CellMargins->{{0, 0}, {1, 1}},
 CellElementSpacings->{"CellMinHeight"->1},
 CellFrameMargins->0,
 CellFrameColor->GrayLevel[0.75],
 CellSize->{
  Inherited, 5},ExpressionUUID->"ca0634f3-2fda-471d-a335-ed9781ead91e"],

Cell[CellGroupData[{

Cell[BoxData[
 StyleBox[
  RowBox[{
  "Dial\[OAcute]gov\[EAcute]", " ", "okno", " ", "na", " ", 
   "precvi\[CHacek]enie", " ", "od\[CHacek]\[IAcute]tanie", " ", "matic"}],
  FontWeight->"Bold"]], "Input",
 CellChangeTimes->{{3.8621273843570127`*^9, 3.862127386836788*^9}},
 TextAlignment->Center,
 Background->GrayLevel[
  0.85],ExpressionUUID->"fc07df28-279e-4660-a66f-162e9fdaf07e"],

Cell[BoxData[
 TagBox[
  StyleBox[
   DynamicModuleBox[{$CellContext`mat1$$ = {{1, 8, 1, 3, -5}, {-9, -2, 9, 6, 
    9}, {-8, 10, 5, 9, -9}, {0, -1, 0, 4, -7}, {2, -6, 7, -3, 
    7}}, $CellContext`mat2$$ = {{-2, 9, 2, 6, 6}, {8, -9, -9, -5, 8}, {5, 6, 
    4, -3, 5}, {5, -1, 10, -4, -5}, {10, 7, 9, -8, 
    0}}, $CellContext`riadok$$ = 3, $CellContext`stlpec$$ = 3, 
    Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, 
    Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 
    1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{{
       Hold[$CellContext`riadok$$], 3, "Po\[CHacek]et riadkov: "}, {1, 2, 3, 
      4, 5}}, {{
       Hold[$CellContext`stlpec$$], 3, "Po\[CHacek]et stlpcov: "}, {1, 2, 3, 
      4, 5}}, {
      Hold[
       Row[{
         Spacer[15], 
         Manipulate`Place[1], 
         Manipulate`Place[2], 
         Button["Vygenerova\[THacek] matice", $CellContext`mat1$$ = Table[
             RandomInteger[{-10, 10}], {5}, {5}]; $CellContext`mat2$$ = Table[
             RandomInteger[{-10, 10}], {5}, {5}]]}, 
        Spacer[15]]], Manipulate`Dump`ThisIsNotAControl}, {{
       Hold[$CellContext`mat1$$], {{-6, 0, -10, 7, -2}, {-3, 
       10, -6, -4, -7}, {7, 8, -5, -5, 0}, {3, -4, -2, 10, 0}, {-1, 
       4, -9, -5, -1}}}}, {{
       Hold[$CellContext`mat2$$], {{-2, 0, 7, -6, 6}, {-7, -2, -10, -5, -6}, {
       4, -5, -8, 6, -7}, {0, -3, 0, -5, -6}, {-9, 9, -8, -9, -1}}}}}, 
    Typeset`size$$ = {500., {247.13403309800196`, 252.86596690199804`}}, 
    Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = True}, 
    DynamicBox[Manipulate`ManipulateBoxes[
     2, StandardForm, 
      "Variables" :> {$CellContext`mat1$$ = {{-6, 0, -10, 7, -2}, {-3, 
         10, -6, -4, -7}, {7, 8, -5, -5, 0}, {3, -4, -2, 10, 0}, {-1, 
         4, -9, -5, -1}}, $CellContext`mat2$$ = {{-2, 0, 7, -6, 
         6}, {-7, -2, -10, -5, -6}, {4, -5, -8, 6, -7}, {0, -3, 
         0, -5, -6}, {-9, 9, -8, -9, -1}}, $CellContext`riadok$$ = 
        3, $CellContext`stlpec$$ = 3}, "ControllerVariables" :> {}, 
      "OtherVariables" :> {
       Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, 
        Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, 
        Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
         Typeset`skipInitDone$$}, 
      "Body" :> ($CellContext`maticaA = 
        Take[$CellContext`mat1$$, {1, $CellContext`riadok$$}, {
          1, $CellContext`stlpec$$}]; $CellContext`maticaB = 
        Take[$CellContext`mat2$$, {1, $CellContext`riadok$$}, {
          1, $CellContext`stlpec$$}]; Pane[
         Column[{
           Row[{
             MatrixForm[{
               
               Grid[$CellContext`maticaA, Alignment -> Right, 
                Spacings -> {1, 1}]}], "   ", " - ", "   ", 
             MatrixForm[{
               
               Grid[$CellContext`maticaB, Alignment -> Right, 
                Spacings -> {1, 1}]}]}], "   ", " = ", "   ", 
           MatrixForm[{
             
             Grid[$CellContext`maticaA - $CellContext`maticaB, 
              Alignment -> {Right, Bottom}, Spacings -> {1, 1}]}]}, Alignment -> 
          Center], ImageSize -> {500, 500}, Alignment -> {Center, Center}]), 
      "Specifications" :> {{{$CellContext`riadok$$, 3, 
          "Po\[CHacek]et riadkov: "}, {1, 2, 3, 4, 5}, ControlType -> Setter, 
         ControlPlacement -> 
         1}, {{$CellContext`stlpec$$, 3, "Po\[CHacek]et stlpcov: "}, {1, 2, 3,
          4, 5}, ControlType -> Setter, ControlPlacement -> 2}, 
        Row[{
          Spacer[15], 
          Manipulate`Place[1], 
          Manipulate`Place[2], 
          Button["Vygenerova\[THacek] matice", $CellContext`mat1$$ = Table[
              RandomInteger[{-10, 10}], {5}, {5}]; $CellContext`mat2$$ = Table[
              RandomInteger[{-10, 10}], {5}, {5}]]}, 
         Spacer[
         15]], {{$CellContext`mat1$$, {{-6, 0, -10, 7, -2}, {-3, 
          10, -6, -4, -7}, {7, 8, -5, -5, 0}, {3, -4, -2, 10, 0}, {-1, 
          4, -9, -5, -1}}}, ControlType -> 
         None}, {{$CellContext`mat2$$, {{-2, 0, 7, -6, 
          6}, {-7, -2, -10, -5, -6}, {4, -5, -8, 6, -7}, {0, -3, 
          0, -5, -6}, {-9, 9, -8, -9, -1}}}, ControlType -> None}}, 
      "Options" :> {ControlPlacement -> Top, AutorunSequencing -> {1, 2, 3}}, 
      "DefaultOptions" :> {}],
     ImageSizeCache->{550., {295.13403309800196`, 300.86596690199804`}},
     SingleEvaluation->True],
    Deinitialization:>None,
    DynamicModuleValues:>{},
    SynchronousInitialization->True,
    UndoTrackedVariables:>{Typeset`show$$, Typeset`bookmarkMode$$},
    UnsavedVariables:>{Typeset`initDone$$},
    UntrackedVariables:>{Typeset`size$$}], "Manipulate",
   Deployed->True,
   StripOnInput->False],
  Manipulate`InterpretManipulate[1]]], "Output",
 CellChangeTimes->{3.862127440002869*^9},
 TextAlignment->Center,
 Background->RGBColor[1, 0.9, 0.8],
 CellLabel->"Out[35]=",ExpressionUUID->"75663bf3-2e27-4f01-9d27-e5a48bddb64a"]
}, Open  ]],

Cell[" ", "Text",
 Editable->False,
 Selectable->False,
 CellFrame->{{0, 0}, {0, 3}},
 ShowCellBracket->False,
 CellMargins->{{0, 0}, {1, 1}},
 CellElementSpacings->{"CellMinHeight"->1},
 CellFrameMargins->0,
 CellFrameColor->GrayLevel[0.75],
 CellSize->{
  Inherited, 5},ExpressionUUID->"1b727c1b-df67-43cc-9bad-04f3b5b16d06"],

Cell[CellGroupData[{

Cell[BoxData[
 StyleBox[
  RowBox[{
  "Dial\[OAcute]gov\[EAcute]", " ", "okno", " ", "na", " ", 
   "precvi\[CHacek]enie", " ", "n\[AAcute]sobenie", " ", "matic"}],
  FontWeight->"Bold"]], "Input",
 CellChangeTimes->{{3.862127634459465*^9, 3.862127635832214*^9}},
 TextAlignment->Center,
 Background->GrayLevel[
  0.85],ExpressionUUID->"e50c7a7a-821f-4696-9f35-1dcb6a8d3075"],

Cell[BoxData[
 TagBox[
  StyleBox[
   DynamicModuleBox[{$CellContext`mat1$$ = {{3, 4, 7, 5, -10}, {-4, -10, 
    7, -8, 7}, {8, 2, 8, 5, 2}, {-5, 1, 8, -9, 3}, {-6, -7, 9, 9, 
    4}}, $CellContext`mat2$$ = {{2, -5, 6, 9, 10}, {4, -10, -3, 8, 1}, {2, 1, 
    3, 5, -3}, {6, 2, -10, 6, -10}, {-8, 7, 5, 
    2, -10}}, $CellContext`riadok$$ = 3, $CellContext`stlpec$$ = 3, 
    Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, 
    Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 
    1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{{
       Hold[$CellContext`riadok$$], 3, "Po\[CHacek]et riadkov: "}, {1, 2, 3, 
      4, 5}}, {{
       Hold[$CellContext`stlpec$$], 3, "Po\[CHacek]et stlpcov: "}, {1, 2, 3, 
      4, 5}}, {
      Hold[
       Row[{
         Spacer[15], 
         Manipulate`Place[1], 
         Manipulate`Place[2], 
         Button["Vygenerova\[THacek] matice", $CellContext`mat1$$ = Table[
             RandomInteger[{-10, 10}], {5}, {5}]; $CellContext`mat2$$ = Table[
             RandomInteger[{-10, 10}], {5}, {5}]]}, 
        Spacer[15]]], Manipulate`Dump`ThisIsNotAControl}, {{
       Hold[$CellContext`mat1$$], {{3, 4, 7, 5, -10}, {-4, -10, 7, -8, 7}, {8,
        2, 8, 5, 2}, {-5, 1, 8, -9, 3}, {-6, -7, 9, 9, 4}}}}, {{
       Hold[$CellContext`mat2$$], {{2, -5, 6, 9, 10}, {4, -10, -3, 8, 1}, {2, 
       1, 3, 5, -3}, {6, 2, -10, 6, -10}, {-8, 7, 5, 2, -10}}}}}, 
    Typeset`size$$ = {500., {247.13403309800196`, 252.86596690199804`}}, 
    Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = True}, 
    DynamicBox[Manipulate`ManipulateBoxes[
     2, StandardForm, 
      "Variables" :> {$CellContext`mat1$$ = {{3, 4, 7, 5, -10}, {-4, -10, 
         7, -8, 7}, {8, 2, 8, 5, 2}, {-5, 1, 8, -9, 3}, {-6, -7, 9, 9, 
         4}}, $CellContext`mat2$$ = {{2, -5, 6, 9, 10}, {4, -10, -3, 8, 1}, {
         2, 1, 3, 5, -3}, {6, 2, -10, 6, -10}, {-8, 7, 5, 
         2, -10}}, $CellContext`riadok$$ = 3, $CellContext`stlpec$$ = 3}, 
      "ControllerVariables" :> {}, 
      "OtherVariables" :> {
       Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, 
        Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, 
        Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
         Typeset`skipInitDone$$}, 
      "Body" :> ($CellContext`maticaA = 
        Take[$CellContext`mat1$$, {1, $CellContext`riadok$$}, {
          1, $CellContext`stlpec$$}]; $CellContext`maticaB = 
        Take[$CellContext`mat2$$, {1, $CellContext`riadok$$}, {
          1, $CellContext`stlpec$$}]; Pane[
         Column[{
           Row[{
             MatrixForm[{
               
               Grid[$CellContext`maticaA, Alignment -> Right, 
                Spacings -> {1, 1}]}], "   ", " * ", "   ", 
             MatrixForm[{
               
               Grid[$CellContext`maticaB, Alignment -> Right, 
                Spacings -> {1, 1}]}]}], "   ", " = ", "   ", 
           MatrixForm[{
             
             Grid[$CellContext`maticaA $CellContext`maticaB, 
              Alignment -> {Right, Bottom}, Spacings -> {1, 1}]}]}, Alignment -> 
          Center], ImageSize -> {500, 500}, Alignment -> {Center, Center}]), 
      "Specifications" :> {{{$CellContext`riadok$$, 3, 
          "Po\[CHacek]et riadkov: "}, {1, 2, 3, 4, 5}, ControlType -> Setter, 
         ControlPlacement -> 
         1}, {{$CellContext`stlpec$$, 3, "Po\[CHacek]et stlpcov: "}, {1, 2, 3,
          4, 5}, ControlType -> Setter, ControlPlacement -> 2}, 
        Row[{
          Spacer[15], 
          Manipulate`Place[1], 
          Manipulate`Place[2], 
          Button["Vygenerova\[THacek] matice", $CellContext`mat1$$ = Table[
              RandomInteger[{-10, 10}], {5}, {5}]; $CellContext`mat2$$ = Table[
              RandomInteger[{-10, 10}], {5}, {5}]]}, 
         Spacer[
         15]], {{$CellContext`mat1$$, {{3, 4, 7, 5, -10}, {-4, -10, 7, -8, 
          7}, {8, 2, 8, 5, 2}, {-5, 1, 8, -9, 3}, {-6, -7, 9, 9, 4}}}, 
         ControlType -> 
         None}, {{$CellContext`mat2$$, {{2, -5, 6, 9, 10}, {4, -10, -3, 8, 
          1}, {2, 1, 3, 5, -3}, {6, 2, -10, 6, -10}, {-8, 7, 5, 2, -10}}}, 
         ControlType -> None}}, 
      "Options" :> {ControlPlacement -> Top, AutorunSequencing -> {1, 2, 3}}, 
      "DefaultOptions" :> {}],
     ImageSizeCache->{550., {295.13403309800196`, 300.86596690199804`}},
     SingleEvaluation->True],
    Deinitialization:>None,
    DynamicModuleValues:>{},
    SynchronousInitialization->True,
    UndoTrackedVariables:>{Typeset`show$$, Typeset`bookmarkMode$$},
    UnsavedVariables:>{Typeset`initDone$$},
    UntrackedVariables:>{Typeset`size$$}], "Manipulate",
   Deployed->True,
   StripOnInput->False],
  Manipulate`InterpretManipulate[1]]], "Output",
 CellChangeTimes->{3.862127480356962*^9},
 TextAlignment->Center,
 Background->RGBColor[1, 0.9, 0.8],
 CellLabel->"Out[37]=",ExpressionUUID->"17a6af63-8f62-4e94-a29f-121d817d2d48"]
}, Open  ]],

Cell[" ", "Text",
 Editable->False,
 Selectable->False,
 CellFrame->{{0, 0}, {0, 3}},
 ShowCellBracket->False,
 CellMargins->{{0, 0}, {1, 1}},
 CellElementSpacings->{"CellMinHeight"->1},
 CellFrameMargins->0,
 CellFrameColor->GrayLevel[0.75],
 CellSize->{
  Inherited, 5},ExpressionUUID->"f0645f9c-1b43-49ef-8a60-27955a877f83"],

Cell[CellGroupData[{

Cell[BoxData[
 StyleBox[
  RowBox[{
  "Dial\[OAcute]gov\[EAcute]", " ", "okno", " ", "na", " ", 
   "precvi\[CHacek]enie", " ", "delenie", " ", "matic"}],
  FontWeight->"Bold"]], "Input",
 CellChangeTimes->{{3.8621276827735066`*^9, 3.8621276835490856`*^9}},
 TextAlignment->Center,
 Background->GrayLevel[
  0.85],ExpressionUUID->"f338eaae-76c0-4469-9605-25863a5f142d"],

Cell[BoxData[
 TagBox[
  StyleBox[
   DynamicModuleBox[{$CellContext`mat1$$ = {{10, -4, -9, -7, 0}, {7, -8, 10, 
    8, -2}, {-9, -9, -6, -3, -3}, {3, -1, -3, 4, 5}, {2, 10, 0, 6, 
    3}}, $CellContext`mat2$$ = {{6, -2, -7, 8, 3}, {-6, -1, -4, 0, 2}, {-4, 
    8, -8, 2, 2}, {-9, -3, 7, 3, 9}, {7, 7, -8, 
    1, -7}}, $CellContext`riadok$$ = 3, $CellContext`stlpec$$ = 3, 
    Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, 
    Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 
    1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{{
       Hold[$CellContext`riadok$$], 3, "Po\[CHacek]et riadkov: "}, {1, 2, 3, 
      4, 5}}, {{
       Hold[$CellContext`stlpec$$], 3, "Po\[CHacek]et stlpcov: "}, {1, 2, 3, 
      4, 5}}, {
      Hold[
       Row[{
         Spacer[15], 
         Manipulate`Place[1], 
         Manipulate`Place[2], 
         Button["Vygenerova\[THacek] matice", $CellContext`mat1$$ = Table[
             RandomInteger[{-10, 10}], {5}, {5}]; $CellContext`mat2$$ = Table[
             RandomInteger[{-10, 10}], {5}, {5}]]}, 
        Spacer[15]]], Manipulate`Dump`ThisIsNotAControl}, {{
       Hold[$CellContext`mat1$$], {{10, -4, -9, -7, 0}, {7, -8, 10, 
       8, -2}, {-9, -9, -6, -3, -3}, {3, -1, -3, 4, 5}, {2, 10, 0, 6, 3}}}}, {{
       Hold[$CellContext`mat2$$], {{6, -2, -7, 8, 3}, {-6, -1, -4, 0, 2}, {-4,
        8, -8, 2, 2}, {-9, -3, 7, 3, 9}, {7, 7, -8, 1, -7}}}}}, 
    Typeset`size$$ = {500., {247.13403309800196`, 252.86596690199804`}}, 
    Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = True}, 
    DynamicBox[Manipulate`ManipulateBoxes[
     2, StandardForm, 
      "Variables" :> {$CellContext`mat1$$ = {{10, -4, -9, -7, 0}, {7, -8, 10, 
         8, -2}, {-9, -9, -6, -3, -3}, {3, -1, -3, 4, 5}, {2, 10, 0, 6, 
         3}}, $CellContext`mat2$$ = {{6, -2, -7, 8, 3}, {-6, -1, -4, 0, 
         2}, {-4, 8, -8, 2, 2}, {-9, -3, 7, 3, 9}, {7, 7, -8, 
         1, -7}}, $CellContext`riadok$$ = 3, $CellContext`stlpec$$ = 3}, 
      "ControllerVariables" :> {}, 
      "OtherVariables" :> {
       Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, 
        Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, 
        Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
         Typeset`skipInitDone$$}, 
      "Body" :> ($CellContext`maticaA = 
        Take[$CellContext`mat1$$, {1, $CellContext`riadok$$}, {
          1, $CellContext`stlpec$$}]; $CellContext`maticaB = 
        Take[$CellContext`mat2$$, {1, $CellContext`riadok$$}, {
          1, $CellContext`stlpec$$}]; Pane[
         Column[{
           Row[{
             MatrixForm[{
               
               Grid[$CellContext`maticaA, Alignment -> Right, 
                Spacings -> {1, 1}]}], "   ", " / ", "   ", 
             MatrixForm[{
               
               Grid[$CellContext`maticaB, Alignment -> Right, 
                Spacings -> {1, 1}]}]}], "   ", " = ", "   ", 
           MatrixForm[{
             
             Grid[$CellContext`maticaA/$CellContext`maticaB, 
              Alignment -> {Right, Bottom}, Spacings -> {1, 1}]}]}, Alignment -> 
          Center], ImageSize -> {500, 500}, Alignment -> {Center, Center}]), 
      "Specifications" :> {{{$CellContext`riadok$$, 3, 
          "Po\[CHacek]et riadkov: "}, {1, 2, 3, 4, 5}, ControlType -> Setter, 
         ControlPlacement -> 
         1}, {{$CellContext`stlpec$$, 3, "Po\[CHacek]et stlpcov: "}, {1, 2, 3,
          4, 5}, ControlType -> Setter, ControlPlacement -> 2}, 
        Row[{
          Spacer[15], 
          Manipulate`Place[1], 
          Manipulate`Place[2], 
          Button["Vygenerova\[THacek] matice", $CellContext`mat1$$ = Table[
              RandomInteger[{-10, 10}], {5}, {5}]; $CellContext`mat2$$ = Table[
              RandomInteger[{-10, 10}], {5}, {5}]]}, 
         Spacer[
         15]], {{$CellContext`mat1$$, {{10, -4, -9, -7, 0}, {7, -8, 10, 
          8, -2}, {-9, -9, -6, -3, -3}, {3, -1, -3, 4, 5}, {2, 10, 0, 6, 3}}},
          ControlType -> 
         None}, {{$CellContext`mat2$$, {{6, -2, -7, 8, 3}, {-6, -1, -4, 0, 
          2}, {-4, 8, -8, 2, 2}, {-9, -3, 7, 3, 9}, {7, 7, -8, 1, -7}}}, 
         ControlType -> None}}, 
      "Options" :> {ControlPlacement -> Top, AutorunSequencing -> {1, 2, 3}}, 
      "DefaultOptions" :> {}],
     ImageSizeCache->{550., {295.13403309800196`, 300.86596690199804`}},
     SingleEvaluation->True],
    Deinitialization:>None,
    DynamicModuleValues:>{},
    SynchronousInitialization->True,
    UndoTrackedVariables:>{Typeset`show$$, Typeset`bookmarkMode$$},
    UnsavedVariables:>{Typeset`initDone$$},
    UntrackedVariables:>{Typeset`size$$}], "Manipulate",
   Deployed->True,
   StripOnInput->False],
  Manipulate`InterpretManipulate[1]]], "Output",
 CellChangeTimes->{3.8621277145702114`*^9},
 TextAlignment->Center,
 Background->RGBColor[1, 0.9, 0.8],
 CellLabel->"Out[42]=",ExpressionUUID->"a38948b2-8e78-4b67-baa1-99073098333a"]
}, Open  ]],

Cell[" ", "Text",
 Editable->False,
 Selectable->False,
 CellFrame->{{0, 0}, {0, 3}},
 ShowCellBracket->False,
 CellMargins->{{0, 0}, {1, 1}},
 CellElementSpacings->{"CellMinHeight"->1},
 CellFrameMargins->0,
 CellFrameColor->GrayLevel[0.75],
 CellSize->{
  Inherited, 5},ExpressionUUID->"a6bc1f2e-e04f-45ff-92e5-5083b96d82bd"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{
   StyleBox["(*",
    FontColor->RGBColor[1, 0.5, 0]], 
   RowBox[{
    StyleBox["Grafy",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox[" ",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox["je",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox[" ",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox["mo\[ZHacek]n\[EAcute]",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox[" ",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox["prenies\[THacek]",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox[" ",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox["do",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox[" ",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox["interakt\[IAcute]vnej",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox[" ",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox["podoby",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox[" ",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox["pomocou",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox[" ",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox["funkcie",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox[" ",
     FontColor->RGBColor[1, 0.5, 0]], 
    RowBox[{
     StyleBox["\"\<\>",
      FontColor->RGBColor[1, 0.5, 0]], 
     StyleBox["Manipulate",
      FontColor->RGBColor[1, 0, 0]], 
     StyleBox["\"\<\>",
      FontColor->RGBColor[1, 0.5, 0]]}]}], 
   StyleBox["*)",
    FontColor->RGBColor[1, 0.5, 0]]}], "\n", 
  RowBox[{
   StyleBox["(*",
    FontColor->RGBColor[1, 0.5, 0]], 
   RowBox[{
    StyleBox["2",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox["D",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox[" ",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox["graf",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox[" ",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox["zobrazuj\[UAcute]ci",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox[" ",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox["Cosinusoidu",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox[" ",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox["s",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox[" ",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox["pos\[UAcute]vnikom",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox[" ",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox["ktor\[YAcute]m",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox[" ",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox["m\[OHat]\[ZHacek]eme",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox[" ",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox["meni\[THacek]",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox[" ",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox["ve\:013ekos\[THacek]",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox[" ",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox["zobrazenia",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox[" ",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox["cosinusoidy",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox[" ",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox["na",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox[" ",
     FontColor->RGBColor[1, 0.5, 0]], 
    RowBox[{
     StyleBox["grafe",
      FontColor->RGBColor[1, 0.5, 0]], 
     StyleBox[".",
      FontColor->RGBColor[1, 0.5, 0]], 
     StyleBox[" ",
      FontColor->RGBColor[1, 0.5, 0]], 
     StyleBox["Posuvn\[IAcute]ku",
      FontColor->RGBColor[1, 0, 1]]}], 
    StyleBox[" ",
     FontColor->RGBColor[1, 0, 1]], 
    StyleBox["mus\[IAcute]me",
     FontColor->RGBColor[1, 0, 1]], 
    StyleBox[" ",
     FontColor->RGBColor[1, 0, 1]], 
    StyleBox["taktie\[ZHacek]",
     FontColor->RGBColor[1, 0, 1]], 
    StyleBox[" ",
     FontColor->RGBColor[1, 0, 1]], 
    StyleBox["nastavi\[THacek]",
     FontColor->RGBColor[1, 0, 1]], 
    StyleBox[" ",
     FontColor->RGBColor[1, 0, 1]], 
    StyleBox["hodnotu",
     FontColor->RGBColor[1, 0, 1]], 
    StyleBox[" ",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox["pod\:013ea",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox[" ",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox["ktorej",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox[" ",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox["sa",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox[" ",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox["nastav\[IAcute]",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox[" ",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox["rozmedzie",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox[" ",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox["posunu",
     FontColor->RGBColor[1, 0.5, 0]]}], 
   StyleBox["*)",
    FontColor->RGBColor[1, 0.5, 0]]}], 
  StyleBox["\[IndentingNewLine]",
   FontColor->RGBColor[1, 0, 0]], 
  RowBox[{
   StyleBox["Manipulate",
    FontColor->RGBColor[1, 0, 0]], "[", 
   RowBox[{
    RowBox[{"Plot", "[", 
     RowBox[{
      RowBox[{"Cos", "[", 
       RowBox[{"Posuvnik", " ", "x"}], "]"}], ",", 
      RowBox[{"{", 
       RowBox[{"x", ",", "0", ",", "10"}], "}"}]}], "]"}], ",", 
    RowBox[{"{", 
     StyleBox[
      RowBox[{"Posuvnik", ",", "1", ",", "10"}],
      FontColor->RGBColor[1, 0, 1]], "}"}]}], "]"}]}]], "Input",
 CellChangeTimes->{{3.8620382297682095`*^9, 3.862038270013137*^9}, 
   3.862038562745386*^9, {3.862038608703236*^9, 3.862038613710127*^9}, {
   3.862038772144519*^9, 3.8620387986547728`*^9}},
 Background->GrayLevel[0.85],
 CellLabel->"In[53]:=",ExpressionUUID->"bfc5b7bb-8b1c-4d6f-b9fb-f7d520a68ae9"],

Cell[BoxData[
 TagBox[
  StyleBox[
   DynamicModuleBox[{$CellContext`Posuvnik$$ = 1., Typeset`show$$ = True, 
    Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", 
    Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = 
    "\"untitled\"", Typeset`specs$$ = {{
      Hold[$CellContext`Posuvnik$$], 1, 10}}, Typeset`size$$ = {
    360., {104., 109.37589585894861`}}, Typeset`update$$ = 0, 
    Typeset`initDone$$, Typeset`skipInitDone$$ = True}, 
    DynamicBox[Manipulate`ManipulateBoxes[
     1, StandardForm, "Variables" :> {$CellContext`Posuvnik$$ = 1}, 
      "ControllerVariables" :> {}, 
      "OtherVariables" :> {
       Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, 
        Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, 
        Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
         Typeset`skipInitDone$$}, "Body" :> Plot[
        Cos[$CellContext`Posuvnik$$ $CellContext`x], {$CellContext`x, 0, 10}],
       "Specifications" :> {{$CellContext`Posuvnik$$, 1, 10}}, 
      "Options" :> {}, "DefaultOptions" :> {}],
     ImageSizeCache->{410., {149.13403309800196`, 154.86596690199804`}},
     SingleEvaluation->True],
    Deinitialization:>None,
    DynamicModuleValues:>{},
    SynchronousInitialization->True,
    UndoTrackedVariables:>{Typeset`show$$, Typeset`bookmarkMode$$},
    UnsavedVariables:>{Typeset`initDone$$},
    UntrackedVariables:>{Typeset`size$$}], "Manipulate",
   Deployed->True,
   StripOnInput->False],
  Manipulate`InterpretManipulate[1]]], "Output",
 CellChangeTimes->{{3.862038305021561*^9, 3.862038351044965*^9}, 
   3.862038387413459*^9, {3.8620386058766527`*^9, 3.862038615080201*^9}, {
   3.8620387943846183`*^9, 3.8620388015379124`*^9}},
 TextAlignment->Center,
 Background->RGBColor[1, 0.9, 0.8],
 CellLabel->"Out[53]=",ExpressionUUID->"80f6b69a-bf25-4dca-bedc-5714f82e6399"]
}, Open  ]],

Cell[" ", "Text",
 Editable->False,
 Selectable->False,
 CellFrame->{{0, 0}, {0, 3}},
 ShowCellBracket->False,
 CellMargins->{{0, 0}, {1, 1}},
 CellElementSpacings->{"CellMinHeight"->1},
 CellFrameMargins->0,
 CellFrameColor->GrayLevel[0.75],
 CellSize->{
  Inherited, 5},ExpressionUUID->"739f5f76-6a99-4ebd-8a73-4f8178fb4d43"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"(*", 
    RowBox[{
    "2", "D", " ", "graf", " ", "zobrazuj\[UAcute]ci", " ", "Cosinusoidu", 
     " ", "s", " ", "mo\[ZHacek]nos\[THacek]ou", " ", "zmeny", " ", "farby", 
     " ", "krivky", " ", "na", " ", 
     RowBox[{"grafe", "."}]}], "*)"}],
   FontColor->RGBColor[1, 0.5, 0]], "\n", 
  RowBox[{"Manipulate", "[", 
   RowBox[{
    RowBox[{"Plot", "[", 
     RowBox[{
      RowBox[{"Cos", "[", "x", "]"}], ",", 
      RowBox[{"{", 
       RowBox[{"x", ",", "0", ",", "10"}], "}"}], ",", 
      RowBox[{"PlotStyle", "->", "Farba"}]}], " ", "]"}], ",", 
    RowBox[{"{", 
     RowBox[{"Farba", " ", ",", "Blue"}], "}"}]}], "]"}]}]], "Input",
 CellChangeTimes->{{3.862038814117544*^9, 3.8620388829746933`*^9}},
 Background->GrayLevel[
  0.85],ExpressionUUID->"f4c2b5d1-7b7b-4ed2-8894-762b167e5820"],

Cell[BoxData[
 TagBox[
  StyleBox[
   DynamicModuleBox[{$CellContext`Farba$$ = RGBColor[0, 0, 1], 
    Typeset`show$$ = True, Typeset`bookmarkList$$ = {}, 
    Typeset`bookmarkMode$$ = "Menu", Typeset`animator$$, Typeset`animvar$$ = 
    1, Typeset`name$$ = "\"untitled\"", Typeset`specs$$ = {{
      Hold[$CellContext`Farba$$], 
      RGBColor[0, 0, 1]}}, Typeset`size$$ = {
    360., {104., 109.37589585894861`}}, Typeset`update$$ = 0, 
    Typeset`initDone$$, Typeset`skipInitDone$$ = True}, 
    DynamicBox[Manipulate`ManipulateBoxes[
     1, StandardForm, 
      "Variables" :> {$CellContext`Farba$$ = RGBColor[0, 0, 1]}, 
      "ControllerVariables" :> {}, 
      "OtherVariables" :> {
       Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, 
        Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, 
        Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
         Typeset`skipInitDone$$}, "Body" :> Plot[
        Cos[$CellContext`x], {$CellContext`x, 0, 10}, 
        PlotStyle -> $CellContext`Farba$$], 
      "Specifications" :> {{$CellContext`Farba$$, 
         RGBColor[0, 0, 1]}}, "Options" :> {}, "DefaultOptions" :> {}],
     ImageSizeCache->{410., {154.13403309800196`, 159.86596690199804`}},
     SingleEvaluation->True],
    Deinitialization:>None,
    DynamicModuleValues:>{},
    SynchronousInitialization->True,
    UndoTrackedVariables:>{Typeset`show$$, Typeset`bookmarkMode$$},
    UnsavedVariables:>{Typeset`initDone$$},
    UntrackedVariables:>{Typeset`size$$}], "Manipulate",
   Deployed->True,
   StripOnInput->False],
  Manipulate`InterpretManipulate[1]]], "Output",
 CellChangeTimes->{{3.8620386387372856`*^9, 3.862038763742708*^9}, 
   3.8620388273843327`*^9},
 TextAlignment->Center,
 Background->RGBColor[1, 0.9, 0.8],
 CellLabel->"Out[54]=",ExpressionUUID->"eade2cfc-ea97-4813-9c62-e05960bc0a2b"]
}, Open  ]],

Cell[" ", "Text",
 Editable->False,
 Selectable->False,
 CellFrame->{{0, 0}, {0, 3}},
 ShowCellBracket->False,
 CellMargins->{{0, 0}, {1, 1}},
 CellElementSpacings->{"CellMinHeight"->1},
 CellFrameMargins->0,
 CellFrameColor->GrayLevel[0.75],
 CellSize->{
  Inherited, 5},ExpressionUUID->"44f0e1ec-b425-4131-b4e9-6d920aa207e8"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"(*", 
    RowBox[{
    "2", "D", " ", "graf", " ", "zobrazuj\[UAcute]ci", " ", "Cosinusoidu", 
     " ", "s", " ", "mo\[ZHacek]nos\[THacek]ou", " ", "zmeny", " ", "farby", "  ",
      "a", " ", "ve\:013ekosti", " ", "zobrazenia", " ", "krivky", " ", "na", 
     " ", 
     RowBox[{"grafe", "."}]}], "*)"}],
   FontColor->RGBColor[1, 0.5, 0]], "\n", 
  RowBox[{"Manipulate", "[", 
   RowBox[{
    RowBox[{"Plot", "[", 
     RowBox[{
      RowBox[{"Cos", "[", 
       RowBox[{"Posuvnik2", " ", "x"}], "]"}], ",", 
      RowBox[{"{", 
       RowBox[{"x", ",", "0", ",", "10"}], "}"}], ",", 
      RowBox[{"PlotStyle", "->", "Farba"}]}], "]"}], ",", 
    RowBox[{"{", 
     RowBox[{"Posuvnik2", ",", "1", ",", "10"}], "}"}], ",", 
    RowBox[{"{", 
     RowBox[{"Farba", ",", "Blue"}], "}"}]}], "]"}]}]], "Input",
 CellChangeTimes->{{3.8620389094368973`*^9, 3.8620389166781025`*^9}, {
  3.8620389995895033`*^9, 3.862039026597848*^9}, {3.862039255285823*^9, 
  3.862039256781577*^9}},
 Background->GrayLevel[0.85],
 CellLabel->"In[63]:=",ExpressionUUID->"d838882d-6ad5-4131-b728-93a626417248"],

Cell[BoxData[
 TagBox[
  StyleBox[
   DynamicModuleBox[{$CellContext`Farba$$ = RGBColor[
    0, 0, 1], $CellContext`Posuvnik2$$ = 1, Typeset`show$$ = True, 
    Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", 
    Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = 
    "\"untitled\"", Typeset`specs$$ = {{
      Hold[$CellContext`Posuvnik2$$], 1, 10}, {
      Hold[$CellContext`Farba$$], 
      RGBColor[0, 0, 1]}}, Typeset`size$$ = {
    360., {104., 109.37589585894861`}}, Typeset`update$$ = 0, 
    Typeset`initDone$$, Typeset`skipInitDone$$ = True}, 
    DynamicBox[Manipulate`ManipulateBoxes[
     1, StandardForm, 
      "Variables" :> {$CellContext`Farba$$ = 
        RGBColor[0, 0, 1], $CellContext`Posuvnik2$$ = 1}, 
      "ControllerVariables" :> {}, 
      "OtherVariables" :> {
       Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, 
        Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, 
        Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
         Typeset`skipInitDone$$}, "Body" :> Plot[
        Cos[$CellContext`Posuvnik2$$ $CellContext`x], {$CellContext`x, 0, 10},
         PlotStyle -> $CellContext`Farba$$], 
      "Specifications" :> {{$CellContext`Posuvnik2$$, 1, 
         10}, {$CellContext`Farba$$, 
         RGBColor[0, 0, 1]}}, "Options" :> {}, "DefaultOptions" :> {}],
     ImageSizeCache->{410., {166.13403309800196`, 171.86596690199804`}},
     SingleEvaluation->True],
    Deinitialization:>None,
    DynamicModuleValues:>{},
    SynchronousInitialization->True,
    UndoTrackedVariables:>{Typeset`show$$, Typeset`bookmarkMode$$},
    UnsavedVariables:>{Typeset`initDone$$},
    UntrackedVariables:>{Typeset`size$$}], "Manipulate",
   Deployed->True,
   StripOnInput->False],
  Manipulate`InterpretManipulate[1]]], "Output",
 CellChangeTimes->{{3.86203897996741*^9, 3.8620389927857037`*^9}, 
   3.862039028186472*^9, 3.8620392579372053`*^9},
 TextAlignment->Center,
 Background->RGBColor[1, 0.9, 0.8],
 CellLabel->"Out[63]=",ExpressionUUID->"21ca9342-25a9-42ef-ac25-672d5c02e70f"]
}, Open  ]],

Cell[" ", "Text",
 Editable->False,
 Selectable->False,
 CellFrame->{{0, 0}, {0, 3}},
 ShowCellBracket->False,
 CellMargins->{{0, 0}, {1, 1}},
 CellElementSpacings->{"CellMinHeight"->1},
 CellFrameMargins->0,
 CellFrameColor->GrayLevel[0.75],
 CellSize->{
  Inherited, 5},ExpressionUUID->"1c6d4999-8308-4037-83f8-04b9d48ac324"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"(*", 
    RowBox[{
    "Rovnak\[EAcute]", " ", "pravidl\[AAcute]", " ", "platia", " ", "aj", " ",
      "pre", " ", "3", "D", " ", "grafy"}], "*)"}],
   FontColor->RGBColor[1, 0.5, 0]], "\n", 
  RowBox[{
   StyleBox["Manipulate",
    FontColor->GrayLevel[0]], "[", 
   RowBox[{
    RowBox[{"Plot3D", "[", 
     RowBox[{
      RowBox[{"Cos", "[", 
       RowBox[{"Posuvnik3", " ", "x"}], "]"}], ",", 
      RowBox[{"{", 
       RowBox[{"x", ",", "0", ",", "10"}], "}"}], " ", ",", " ", 
      RowBox[{"{", 
       RowBox[{"y", ",", " ", "0", ",", " ", "10"}], "}"}]}], "]"}], ",", 
    RowBox[{"{", 
     StyleBox[
      RowBox[{"Posuvnik3", ",", "1", ",", "3"}],
      FontColor->GrayLevel[0]], "}"}]}], "]"}]}]], "Input",
 CellChangeTimes->{{3.8620390794617944`*^9, 3.862039115966012*^9}, 
   3.862039307581682*^9},
 Background->GrayLevel[0.85],
 CellLabel->"In[67]:=",ExpressionUUID->"44863c16-93d2-49b2-bde7-4eda386b9c6b"],

Cell[BoxData[
 TagBox[
  StyleBox[
   DynamicModuleBox[{$CellContext`Posuvnik3$$ = 2.378, Typeset`show$$ = True, 
    Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", 
    Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = 
    "\"untitled\"", Typeset`specs$$ = {{
      Hold[$CellContext`Posuvnik3$$], 1, 3}}, Typeset`size$$ = {
    360., {168., 173.34010575182867`}}, Typeset`update$$ = 0, 
    Typeset`initDone$$, Typeset`skipInitDone$$ = True}, 
    DynamicBox[Manipulate`ManipulateBoxes[
     1, StandardForm, "Variables" :> {$CellContext`Posuvnik3$$ = 1}, 
      "ControllerVariables" :> {}, 
      "OtherVariables" :> {
       Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, 
        Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, 
        Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
         Typeset`skipInitDone$$}, "Body" :> Plot3D[
        Cos[$CellContext`Posuvnik3$$ $CellContext`x], {$CellContext`x, 0, 
         10}, {$CellContext`y, 0, 10}], 
      "Specifications" :> {{$CellContext`Posuvnik3$$, 1, 3}}, "Options" :> {},
       "DefaultOptions" :> {}],
     ImageSizeCache->{410., {213.13403309800196`, 218.86596690199804`}},
     SingleEvaluation->True],
    Deinitialization:>None,
    DynamicModuleValues:>{},
    SynchronousInitialization->True,
    UndoTrackedVariables:>{Typeset`show$$, Typeset`bookmarkMode$$},
    UnsavedVariables:>{Typeset`initDone$$},
    UntrackedVariables:>{Typeset`size$$}], "Manipulate",
   Deployed->True,
   StripOnInput->False],
  Manipulate`InterpretManipulate[1]]], "Output",
 CellChangeTimes->{3.862039063295204*^9, 3.862039308027259*^9},
 TextAlignment->Center,
 Background->RGBColor[1, 0.9, 0.8],
 CellLabel->"Out[67]=",ExpressionUUID->"c0d0024f-eb14-4a60-8e7f-6cd9373ada48"]
}, Open  ]],

Cell[" ", "Text",
 Editable->False,
 Selectable->False,
 CellFrame->{{0, 0}, {0, 3}},
 ShowCellBracket->False,
 CellMargins->{{0, 0}, {1, 1}},
 CellElementSpacings->{"CellMinHeight"->1},
 CellFrameMargins->0,
 CellFrameColor->GrayLevel[0.75],
 CellSize->{
  Inherited, 5},ExpressionUUID->"de91c329-9459-4a3a-9956-28e34c0ffd16"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"(*", 
    RowBox[{
    "3", "D", " ", "graf", " ", "zobrazuj\[UAcute]ci", " ", "Cosinusoidu", 
     " ", "s", " ", "mo\[ZHacek]nos\[THacek]ou", " ", "zmeny", " ", "farby", 
     " ", "krivky", " ", "na", " ", 
     RowBox[{"grafe", "."}]}], "*)"}],
   FontColor->RGBColor[1, 0.5, 0]], "\n", 
  RowBox[{"Manipulate", "[", 
   RowBox[{
    RowBox[{"Plot3D", "[", 
     RowBox[{
      RowBox[{"Cos", "[", "x", "]"}], ",", 
      RowBox[{"{", 
       RowBox[{"x", ",", "0", ",", "10"}], "}"}], ",", " ", 
      RowBox[{"{", 
       RowBox[{"y", ",", " ", "0", ",", " ", "10"}], "}"}], ",", " ", 
      RowBox[{"PlotStyle", "->", "Farba"}]}], " ", "]"}], ",", 
    RowBox[{"{", 
     RowBox[{"Farba", " ", ",", "Blue"}], "}"}]}], "]"}]}]], "Input",
 CellChangeTimes->{{3.862039147837228*^9, 3.8620391910931215`*^9}},
 Background->GrayLevel[0.85],
 CellLabel->"In[60]:=",ExpressionUUID->"24b64dd3-8b96-4850-b592-f5b4a7d2a7e7"],

Cell[BoxData[
 TagBox[
  StyleBox[
   DynamicModuleBox[{$CellContext`Farba$$ = RGBColor[
    0.037094682230869, 0.12498664835584039`, 0.], Typeset`show$$ = True, 
    Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", 
    Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = 
    "\"untitled\"", Typeset`specs$$ = {{
      Hold[$CellContext`Farba$$], 
      RGBColor[0, 0, 1]}}, Typeset`size$$ = {360., {168., 173.3401057518371}},
     Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = True}, 
    DynamicBox[Manipulate`ManipulateBoxes[
     1, StandardForm, 
      "Variables" :> {$CellContext`Farba$$ = RGBColor[0, 0, 1]}, 
      "ControllerVariables" :> {}, 
      "OtherVariables" :> {
       Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, 
        Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, 
        Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
         Typeset`skipInitDone$$}, "Body" :> Plot3D[
        Cos[$CellContext`x], {$CellContext`x, 0, 10}, {$CellContext`y, 0, 10},
         PlotStyle -> $CellContext`Farba$$], 
      "Specifications" :> {{$CellContext`Farba$$, 
         RGBColor[0, 0, 1]}}, "Options" :> {}, "DefaultOptions" :> {}],
     ImageSizeCache->{410., {218.13403309800196`, 223.86596690199804`}},
     SingleEvaluation->True],
    Deinitialization:>None,
    DynamicModuleValues:>{},
    SynchronousInitialization->True,
    UndoTrackedVariables:>{Typeset`show$$, Typeset`bookmarkMode$$},
    UnsavedVariables:>{Typeset`initDone$$},
    UntrackedVariables:>{Typeset`size$$}], "Manipulate",
   Deployed->True,
   StripOnInput->False],
  Manipulate`InterpretManipulate[1]]], "Output",
 CellChangeTimes->{{3.862039162782798*^9, 3.8620391920367813`*^9}},
 TextAlignment->Center,
 Background->RGBColor[1, 0.9, 0.8],
 CellLabel->"Out[60]=",ExpressionUUID->"0ce48b9d-5a76-48c3-8996-2c150d7305e6"]
}, Open  ]],

Cell[" ", "Text",
 Editable->False,
 Selectable->False,
 CellFrame->{{0, 0}, {0, 3}},
 ShowCellBracket->False,
 CellMargins->{{0, 0}, {1, 1}},
 CellElementSpacings->{"CellMinHeight"->1},
 CellFrameMargins->0,
 CellFrameColor->GrayLevel[0.75],
 CellSize->{
  Inherited, 5},ExpressionUUID->"fc30f3e6-c98b-4b43-9484-f11ecdca8b21"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"(*", 
    RowBox[{
    "3", "D", " ", "graf", " ", "zobrazuj\[UAcute]ci", " ", "Cosinusoidu", 
     " ", "s", " ", "mo\[ZHacek]nos\[THacek]ou", " ", "zmeny", " ", "farby", "  ",
      "a", " ", "ve\:013ekosti", " ", "zobrazenia", " ", "krivky", " ", "na", 
     " ", 
     RowBox[{"grafe", "."}]}], "*)"}],
   FontColor->RGBColor[1, 0.5, 0]], "\n", 
  RowBox[{"Manipulate", "[", 
   RowBox[{
    RowBox[{"Plot3D", "[", 
     RowBox[{
      RowBox[{"Cos", "[", 
       RowBox[{"Posuvnik4", " ", "x"}], "]"}], ",", 
      RowBox[{"{", 
       RowBox[{"x", ",", "0", ",", "10"}], "}"}], ",", " ", 
      RowBox[{"{", 
       RowBox[{"y", ",", " ", "0", ",", "10"}], "}"}], ",", 
      RowBox[{"PlotStyle", "->", "Farba"}]}], "]"}], ",", 
    RowBox[{"{", 
     RowBox[{"Posuvnik4", ",", "1", ",", "3"}], "}"}], ",", 
    RowBox[{"{", 
     RowBox[{"Farba", ",", "Blue"}], "}"}]}], "]"}]}]], "Input",
 CellChangeTimes->{{3.8620392231979046`*^9, 3.862039301094071*^9}},
 Background->GrayLevel[0.85],
 CellLabel->"In[66]:=",ExpressionUUID->"b12acefa-a63e-4cbe-8e1f-7cccbb0a31a6"],

Cell[BoxData[
 TagBox[
  StyleBox[
   DynamicModuleBox[{$CellContext`Farba$$ = RGBColor[
    0, 0, 1], $CellContext`Posuvnik4$$ = 1.8780000000000001`, Typeset`show$$ =
     True, Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", 
    Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = 
    "\"untitled\"", Typeset`specs$$ = {{
      Hold[$CellContext`Posuvnik4$$], 1, 3}, {
      Hold[$CellContext`Farba$$], 
      RGBColor[0, 0, 1]}}, Typeset`size$$ = {360., {168., 173.3401057518327}},
     Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = True}, 
    DynamicBox[Manipulate`ManipulateBoxes[
     1, StandardForm, 
      "Variables" :> {$CellContext`Farba$$ = 
        RGBColor[0, 0, 1], $CellContext`Posuvnik4$$ = 1}, 
      "ControllerVariables" :> {}, 
      "OtherVariables" :> {
       Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, 
        Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, 
        Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
         Typeset`skipInitDone$$}, "Body" :> Plot3D[
        Cos[$CellContext`Posuvnik4$$ $CellContext`x], {$CellContext`x, 0, 
         10}, {$CellContext`y, 0, 10}, PlotStyle -> $CellContext`Farba$$], 
      "Specifications" :> {{$CellContext`Posuvnik4$$, 1, 
         3}, {$CellContext`Farba$$, 
         RGBColor[0, 0, 1]}}, "Options" :> {}, "DefaultOptions" :> {}],
     ImageSizeCache->{410., {230.13403309800196`, 235.86596690199804`}},
     SingleEvaluation->True],
    Deinitialization:>None,
    DynamicModuleValues:>{},
    SynchronousInitialization->True,
    UndoTrackedVariables:>{Typeset`show$$, Typeset`bookmarkMode$$},
    UnsavedVariables:>{Typeset`initDone$$},
    UntrackedVariables:>{Typeset`size$$}], "Manipulate",
   Deployed->True,
   StripOnInput->False],
  Manipulate`InterpretManipulate[1]]], "Output",
 CellChangeTimes->{{3.8620392448030167`*^9, 3.8620393016718445`*^9}},
 TextAlignment->Center,
 Background->RGBColor[1, 0.9, 0.8],
 CellLabel->"Out[66]=",ExpressionUUID->"649a7a00-62f5-4201-b5f3-92bfa71201ea"]
}, Open  ]],

Cell[" ", "Text",
 Editable->False,
 Selectable->False,
 CellFrame->{{0, 0}, {0, 3}},
 ShowCellBracket->False,
 CellMargins->{{0, 0}, {1, 1}},
 CellElementSpacings->{"CellMinHeight"->1},
 CellFrameMargins->0,
 CellFrameColor->GrayLevel[0.75],
 CellSize->{
  Inherited, 5},ExpressionUUID->"f259cff9-c447-4aee-aae5-adc500acd126"],

Cell[TextData[StyleBox["In\[EAcute] pr\[IAcute]klady",
 FontWeight->"Bold"]], "Text",
 CellChangeTimes->{{3.8621280706777177`*^9, 3.8621280736853247`*^9}},
 TextAlignment->Center,
 Background->GrayLevel[
  0.85],ExpressionUUID->"c6bdde98-c245-4aed-b815-44183944f8b8"],

Cell[CellGroupData[{

Cell[BoxData[
 TagBox[
  StyleBox[
   DynamicModuleBox[{$CellContext`Graf$$ = 
    Sin[$CellContext`x], $CellContext`xmax$$ = 8., Typeset`show$$ = True, 
    Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", 
    Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = 
    "\"untitled\"", Typeset`specs$$ = {{{
       Hold[$CellContext`Graf$$], 
       Sin[$CellContext`x], "Vyberte funkciu: "}, {Cos[$CellContext`x] -> Pane[
         TraditionalForm[
          Cos[$CellContext`x]], Alignment -> Center], Sin[$CellContext`x] -> 
       Pane[
         TraditionalForm[
          Sin[$CellContext`x]], Alignment -> Center], Tan[$CellContext`x] -> 
       Pane[
         TraditionalForm[
          Tan[$CellContext`x]], Alignment -> Center], Cot[$CellContext`x] -> 
       Pane[
         TraditionalForm[
          Cot[$CellContext`x]], Alignment -> Center]}}, {{
       Hold[$CellContext`xmax$$], 1, "Ve\:013ekos\[THacek] zobrazenia"}, 1, 
      50}}, Typeset`size$$ = {360., {109., 113.87420196121224`}}, 
    Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = True}, 
    DynamicBox[Manipulate`ManipulateBoxes[
     1, StandardForm, 
      "Variables" :> {$CellContext`Graf$$ = 
        Sin[$CellContext`x], $CellContext`xmax$$ = 1}, 
      "ControllerVariables" :> {}, 
      "OtherVariables" :> {
       Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, 
        Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, 
        Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
         Typeset`skipInitDone$$}, "Body" :> 
      Plot[$CellContext`Graf$$, {$CellContext`x, -$CellContext`xmax$$, \
$CellContext`xmax$$}], "Specifications" :> {{{$CellContext`Graf$$, 
          Sin[$CellContext`x], "Vyberte funkciu: "}, {
         Cos[$CellContext`x] -> Pane[
            TraditionalForm[
             Cos[$CellContext`x]], Alignment -> Center], Sin[$CellContext`x] -> 
          Pane[
            TraditionalForm[
             Sin[$CellContext`x]], Alignment -> Center], Tan[$CellContext`x] -> 
          Pane[
            TraditionalForm[
             Tan[$CellContext`x]], Alignment -> Center], Cot[$CellContext`x] -> 
          Pane[
            TraditionalForm[
             Cot[$CellContext`x]], Alignment -> 
            Center]}}, {{$CellContext`xmax$$, 1, 
          "Ve\:013ekos\[THacek] zobrazenia"}, 1, 50, Appearance -> 
         "Labeled"}}, "Options" :> {}, "DefaultOptions" :> {}],
     ImageSizeCache->{410., {166.13403309800196`, 171.86596690199804`}},
     SingleEvaluation->True],
    Deinitialization:>None,
    DynamicModuleValues:>{},
    SynchronousInitialization->True,
    UndoTrackedVariables:>{Typeset`show$$, Typeset`bookmarkMode$$},
    UnsavedVariables:>{Typeset`initDone$$},
    UntrackedVariables:>{Typeset`size$$}], "Manipulate",
   Deployed->True,
   StripOnInput->False],
  Manipulate`InterpretManipulate[1]]], "Input",
 CellChangeTimes->{{3.862170449184455*^9, 3.8621704544772973`*^9}},
 TextAlignment->Center,
 Background->RGBColor[
  1, 0.9, 0.8],ExpressionUUID->"076b26dc-b288-43ea-8b57-10c4e96de134"],

Cell[BoxData[
 TagBox[
  StyleBox[
   DynamicModuleBox[{$CellContext`Graf$$ = 
    Cos[$CellContext`x], $CellContext`xmax$$ = 5.65, Typeset`show$$ = True, 
    Typeset`bookmarkList$$ = {}, Typeset`bookmarkMode$$ = "Menu", 
    Typeset`animator$$, Typeset`animvar$$ = 1, Typeset`name$$ = 
    "\"untitled\"", Typeset`specs$$ = {{{
       Hold[$CellContext`Graf$$], 
       Sin[$CellContext`x], "Vyberte funkciu: "}, {Sin[$CellContext`x] -> Pane[
         TraditionalForm[
          Sin[$CellContext`x]], Alignment -> Center], Cos[$CellContext`x] -> 
       Pane[
         TraditionalForm[
          Cos[$CellContext`x]], Alignment -> Center], Tan[$CellContext`x] -> 
       Pane[
         TraditionalForm[
          Tan[$CellContext`x]], Alignment -> Center], Cot[$CellContext`x] -> 
       Pane[
         TraditionalForm[
          Cot[$CellContext`x]], Alignment -> Center]}}, {{
       Hold[$CellContext`xmax$$], 1, "Ve\:013ekos\[THacek] zobrazenia"}, 1, 
      25}}, Typeset`size$$ = {360., {168., 173.34010575183993`}}, 
    Typeset`update$$ = 0, Typeset`initDone$$, Typeset`skipInitDone$$ = True}, 
    DynamicBox[Manipulate`ManipulateBoxes[
     1, StandardForm, 
      "Variables" :> {$CellContext`Graf$$ = 
        Sin[$CellContext`x], $CellContext`xmax$$ = 1}, 
      "ControllerVariables" :> {}, 
      "OtherVariables" :> {
       Typeset`show$$, Typeset`bookmarkList$$, Typeset`bookmarkMode$$, 
        Typeset`animator$$, Typeset`animvar$$, Typeset`name$$, 
        Typeset`specs$$, Typeset`size$$, Typeset`update$$, Typeset`initDone$$,
         Typeset`skipInitDone$$}, "Body" :> 
      Plot3D[$CellContext`Graf$$, {$CellContext`x, -$CellContext`xmax$$, \
$CellContext`xmax$$}, {$CellContext`y, -$CellContext`xmax$$, \
$CellContext`xmax$$}], "Specifications" :> {{{$CellContext`Graf$$, 
          Sin[$CellContext`x], "Vyberte funkciu: "}, {
         Sin[$CellContext`x] -> Pane[
            TraditionalForm[
             Sin[$CellContext`x]], Alignment -> Center], Cos[$CellContext`x] -> 
          Pane[
            TraditionalForm[
             Cos[$CellContext`x]], Alignment -> Center], Tan[$CellContext`x] -> 
          Pane[
            TraditionalForm[
             Tan[$CellContext`x]], Alignment -> Center], Cot[$CellContext`x] -> 
          Pane[
            TraditionalForm[
             Cot[$CellContext`x]], Alignment -> 
            Center]}}, {{$CellContext`xmax$$, 1, 
          "Ve\:013ekos\[THacek] zobrazenia"}, 1, 25, Appearance -> 
         "Labeled"}}, "Options" :> {}, "DefaultOptions" :> {}],
     ImageSizeCache->{410., {226.13403309800196`, 231.86596690199804`}},
     SingleEvaluation->True],
    Deinitialization:>None,
    DynamicModuleValues:>{},
    SynchronousInitialization->True,
    UndoTrackedVariables:>{Typeset`show$$, Typeset`bookmarkMode$$},
    UnsavedVariables:>{Typeset`initDone$$},
    UntrackedVariables:>{Typeset`size$$}], "Manipulate",
   Deployed->True,
   StripOnInput->False],
  Manipulate`InterpretManipulate[1]]], "Output",
 CellChangeTimes->{3.8621279870849123`*^9},
 TextAlignment->Center,
 Background->RGBColor[1, 0.9, 0.8],
 CellLabel->"Out[44]=",ExpressionUUID->"5317a2ef-d61f-4fd1-8ede-f4b13726c103"]
}, Open  ]]
}, Open  ]]
},
WindowSize->{1440., 777.75},
WindowMargins->{{Automatic, 1434}, {-3, Automatic}},
FrontEndVersion->"13.0 for Microsoft Windows (64-bit) (February 4, 2022)",
StyleDefinitions->"Default.nb",
ExpressionUUID->"6505e289-f66a-40e3-a9f5-3547f5aac6aa"
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[CellGroupData[{
Cell[580, 22, 256, 3, 98, "Title",ExpressionUUID->"25e871ca-2021-476b-8df5-22273f72d0cb"],
Cell[839, 27, 468, 7, 28, "Input",ExpressionUUID->"11d4116f-f89c-443c-b667-1ae964c98f69"],
Cell[1310, 36, 304, 6, 28, "Input",ExpressionUUID->"39e08487-a331-4e1e-bc66-6fd750458b9b"],
Cell[1617, 44, 785, 17, 86, "Input",ExpressionUUID->"ad23d50b-fcd8-4fe4-ae93-7bf9382f71f8"],
Cell[2405, 63, 982, 40, 27, "Input",ExpressionUUID->"286a3ab2-ed93-4b89-814b-96a4acf47d9e"],
Cell[3390, 105, 327, 10, 10, "Text",ExpressionUUID->"89f92b63-3d65-4ea0-ac48-c8b866a09a3c"],
Cell[CellGroupData[{
Cell[3742, 119, 386, 9, 44, "Input",ExpressionUUID->"56df8897-3d45-4969-bc9b-4e5294a0c126"],
Cell[4131, 130, 4992, 98, 631, "Output",ExpressionUUID->"edb59e2e-8526-4e7b-9a9b-1844d942c518"]
}, Open  ]],
Cell[9138, 231, 327, 10, 10, "Text",ExpressionUUID->"ca0634f3-2fda-471d-a335-ed9781ead91e"],
Cell[CellGroupData[{
Cell[9490, 245, 385, 9, 44, "Input",ExpressionUUID->"fc07df28-279e-4660-a66f-162e9fdaf07e"],
Cell[9878, 256, 5016, 99, 631, "Output",ExpressionUUID->"75663bf3-2e27-4f01-9d27-e5a48bddb64a"]
}, Open  ]],
Cell[14909, 358, 327, 10, 10, "Text",ExpressionUUID->"1b727c1b-df67-43cc-9bad-04f3b5b16d06"],
Cell[CellGroupData[{
Cell[15261, 372, 375, 9, 44, "Input",ExpressionUUID->"e50c7a7a-821f-4696-9f35-1dcb6a8d3075"],
Cell[15639, 383, 4965, 98, 631, "Output",ExpressionUUID->"17a6af63-8f62-4e94-a29f-121d817d2d48"]
}, Open  ]],
Cell[20619, 484, 327, 10, 10, "Text",ExpressionUUID->"f0645f9c-1b43-49ef-8a60-27955a877f83"],
Cell[CellGroupData[{
Cell[20971, 498, 369, 9, 44, "Input",ExpressionUUID->"f338eaae-76c0-4469-9605-25863a5f142d"],
Cell[21343, 509, 4979, 98, 631, "Output",ExpressionUUID->"a38948b2-8e78-4b67-baa1-99073098333a"]
}, Open  ]],
Cell[26337, 610, 327, 10, 10, "Text",ExpressionUUID->"a6bc1f2e-e04f-45ff-92e5-5083b96d82bd"],
Cell[CellGroupData[{
Cell[26689, 624, 5584, 180, 102, "Input",ExpressionUUID->"bfc5b7bb-8b1c-4d6f-b9fb-f7d520a68ae9"],
Cell[32276, 806, 1891, 37, 339, "Output",ExpressionUUID->"80f6b69a-bf25-4dca-bedc-5714f82e6399"]
}, Open  ]],
Cell[34182, 846, 327, 10, 10, "Text",ExpressionUUID->"739f5f76-6a99-4ebd-8a73-4f8178fb4d43"],
Cell[CellGroupData[{
Cell[34534, 860, 849, 22, 64, "Input",ExpressionUUID->"f4c2b5d1-7b7b-4ed2-8894-762b167e5820"],
Cell[35386, 884, 1873, 39, 349, "Output",ExpressionUUID->"eade2cfc-ea97-4813-9c62-e05960bc0a2b"]
}, Open  ]],
Cell[37274, 926, 327, 10, 10, "Text",ExpressionUUID->"44f0e1ec-b425-4131-b4e9-6d920aa207e8"],
Cell[CellGroupData[{
Cell[37626, 940, 1136, 28, 64, "Input",ExpressionUUID->"d838882d-6ad5-4131-b728-93a626417248"],
Cell[38765, 970, 2086, 43, 373, "Output",ExpressionUUID->"21ca9342-25a9-42ef-ac25-672d5c02e70f"]
}, Open  ]],
Cell[40866, 1016, 327, 10, 10, "Text",ExpressionUUID->"1c6d4999-8308-4037-83f8-04b9d48ac324"],
Cell[CellGroupData[{
Cell[41218, 1030, 973, 27, 64, "Input",ExpressionUUID->"44863c16-93d2-49b2-bde7-4eda386b9c6b"],
Cell[42194, 1059, 1804, 36, 467, "Output",ExpressionUUID->"c0d0024f-eb14-4a60-8e7f-6cd9373ada48"]
}, Open  ]],
Cell[44013, 1098, 327, 10, 10, "Text",ExpressionUUID->"de91c329-9459-4a3a-9956-28e34c0ffd16"],
Cell[CellGroupData[{
Cell[44365, 1112, 968, 24, 64, "Input",ExpressionUUID->"24b64dd3-8b96-4850-b592-f5b4a7d2a7e7"],
Cell[45336, 1138, 1906, 38, 477, "Output",ExpressionUUID->"0ce48b9d-5a76-48c3-8996-2c150d7305e6"]
}, Open  ]],
Cell[47257, 1179, 327, 10, 10, "Text",ExpressionUUID->"fc30f3e6-c98b-4b43-9484-f11ecdca8b21"],
Cell[CellGroupData[{
Cell[47609, 1193, 1121, 28, 64, "Input",ExpressionUUID->"b12acefa-a63e-4cbe-8e1f-7cccbb0a31a6"],
Cell[48733, 1223, 2076, 41, 501, "Output",ExpressionUUID->"649a7a00-62f5-4201-b5f3-92bfa71201ea"]
}, Open  ]],
Cell[50824, 1267, 327, 10, 10, "Text",ExpressionUUID->"f259cff9-c447-4aee-aae5-adc500acd126"],
Cell[51154, 1279, 267, 5, 51, "Text",ExpressionUUID->"c6bdde98-c245-4aed-b815-44183944f8b8"],
Cell[CellGroupData[{
Cell[51446, 1288, 3108, 66, 369, "Input",ExpressionUUID->"076b26dc-b288-43ea-8b57-10c4e96de134"],
Cell[54557, 1356, 3173, 67, 493, "Output",ExpressionUUID->"5317a2ef-d61f-4fd1-8ede-f4b13726c103"]
}, Open  ]]
}, Open  ]]
}
]
*)

