(* 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[     47671,       1396]
NotebookOptionsPosition[     41615,       1293]
NotebookOutlinePosition[     42180,       1313]
CellTagsIndexPosition[     42137,       1310]
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{

Cell[CellGroupData[{
Cell["Matematick\[EAcute] oper\[AAcute]cie", "Title",
 CellChangeTimes->{{3.8619791126158543`*^9, 3.861979117758518*^9}, {
  3.8620656394297686`*^9, 3.8620656426069317`*^9}},
 TextAlignment->Center,ExpressionUUID->"0567922c-1549-4811-8d7e-cc8828342732"],

Cell[TextData[StyleBox["Tento notebook ma obozn\[AAcute]mi\[THacek] pou\
\[ZHacek]\[IAcute]vate\:013ea so zakladn\[YAcute]mi funkciami jazyka Wolfram. \
",
 FontColor->GrayLevel[0]]], "Text",
 CellChangeTimes->{{3.8619791355352983`*^9, 3.861979161567583*^9}, {
  3.8619794035274906`*^9, 3.861979434295844*^9}, {3.8619796828156767`*^9, 
  3.8619797265437107`*^9}, {3.861979885367844*^9, 3.8619799174324083`*^9}, {
  3.86198027352808*^9, 3.861980274440303*^9}, {3.8619821371772594`*^9, 
  3.8619821391692247`*^9}, {3.8620262059727693`*^9, 3.862026261204631*^9}, {
  3.8620263093004303`*^9, 3.8620263107730165`*^9}, {3.862026562692757*^9, 
  3.8620265812368364`*^9}},
 TextAlignment->Center,ExpressionUUID->"df1e7302-b946-456c-962b-45bbf39292ee"],

Cell["V tomto notebooku sa pou\[ZHacek]\[IAcute]vate\:013e nau\[CHacek]\
\[IAcute]:", "Text",
 CellChangeTimes->{
  3.8620262629682674`*^9, {3.8620263158484554`*^9, 
   3.8620263355652285`*^9}},ExpressionUUID->"d5eec622-b756-4fd7-a98b-\
4d0e98b60670"],

Cell[TextData[StyleBox["\[Bullet] S\[CHacek]\[IAcute]ta\[THacek], od\[CHacek]\
\[IAcute]ta\[THacek], n\[AAcute]sobi\[THacek] , deli\[THacek].\n\[Bullet] \
Uklada\[THacek] hodnoty do premenn\[YAcute]ch a pracova\[THacek] s nimi.\n\
\[Bullet] Z\[AAcute]klad pou\[ZHacek]\[IAcute]vania vstavan\[YAcute]ch funkci\
\[IAcute] ktor\[EAcute] pou\[ZHacek]\[IAcute]vatelovi u\[SHacek]etria \
\[CHacek]as.\n\[Bullet] Vytv\[AAcute]ra\[THacek] zlomky.\n\[Bullet] Vytv\
\[AAcute]ra\[THacek] funkcie.\n\[Bullet]  Vytv\[AAcute]ra\[THacek] mocninov\
\[EAcute] pr\[IAcute]klady.",
 FontWeight->"Bold"]], "Text",
 CellChangeTimes->{{3.862026353093169*^9, 
  3.862026539836958*^9}},ExpressionUUID->"3dcffe61-2432-49cc-acea-\
4de5fd5d965b"],

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",
 CellChangeTimes->{{3.862038116735614*^9, 3.862038116736615*^9}},
 TextAlignment->Right,ExpressionUUID->"19d14b74-da63-4662-a730-cee7380a0426"],

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->"d66e855f-4aae-4953-bf43-a45c51df09c3"],

Cell[TextData[StyleBox["Z\[AAcute]kladn\[EAcute] matematick\[EAcute] oper\
\[AAcute]cie",
 FontWeight->"Bold"]], "Text",
 CellChangeTimes->{{3.862037608072022*^9, 3.8620376233881135`*^9}},
 TextAlignment->Center,ExpressionUUID->"322ac609-53d9-4a99-8668-4be1b94dff9a"],

Cell[TextData[{
 StyleBox["(* Pri z\[AAcute]kladn\[YAcute]ch oper\[AAcute]ciach ako \
s\[UAcute] s\[CHacek]\[IAcute]tanie, od\[CHacek]\[IAcute]tanie , \
n\[AAcute]sobenie a delenie sa pou\[ZHacek]\[IAcute]vaju znamie", "Input",
  FontFamily->"Consolas",
  FontWeight->"Bold",
  FontColor->RGBColor[1, 0.5, 0]],
 StyleBox["nka", "Input",
  FontFamily->"Consolas",
  FontWeight->"Bold",
  FontColor->RGBColor[1, 0.5, 0]],
 StyleBox[" + ,  - ,  / ,  *", "Input",
  FontFamily->"Consolas",
  FontWeight->"Bold",
  FontColor->RGBColor[1, 0, 0]],
 StyleBox[" . Desatinn\[EAcute] \[CHacek]\[IAcute]sla sa rozdeluj\[UAcute] \
pomocou bodky. *)\n", "Input",
  FontFamily->"Consolas",
  FontWeight->"Bold",
  FontColor->RGBColor[1, 0.5, 0]],
 "\n",
 Cell[BoxData[
  RowBox[{
   StyleBox[
    RowBox[{"(*", "S\[CHacek]\[IAcute]tanie", "*)"}],
    FontColor->RGBColor[1, 0.5, 0]], "\[IndentingNewLine]", 
   RowBox[{"2", "+", "2"}]}]], "Input",
  CellChangeTimes->{{3.861980167250682*^9, 3.861980174792719*^9}},
  Background->GrayLevel[0.85],ExpressionUUID->
  "6820ab46-a64b-480c-b801-dd206a1a35cd"]
}], "Text",
 CellChangeTimes->{{3.8619799862099266`*^9, 3.861980026375903*^9}, {
  3.861980109159936*^9, 3.8619801503210793`*^9}, {3.861981894104967*^9, 
  3.861981930136984*^9}, {3.862037488796139*^9, 3.862037604852192*^9}},
 Background->GrayLevel[
  0.85],ExpressionUUID->"88a8ebed-de70-4d7a-b2b2-bb7834321317"],

Cell[BoxData["4"], "Output",
 CellChangeTimes->{3.861980176471023*^9},
 Background->RGBColor[1, 0.9, 0.8],
 CellLabel->"Out[1]=",ExpressionUUID->"39fd3f01-35a9-4b63-a7a9-90ca3c30feaa"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"(*", "Od\[CHacek]\[IAcute]tanie", "*)"}],
   FontColor->RGBColor[1, 0.5, 0]], "\[IndentingNewLine]", 
  RowBox[{"2", "-", "2"}]}]], "Input",
 CellChangeTimes->{{3.8619801784615*^9, 3.86198018615256*^9}},
 Background->GrayLevel[0.85],
 CellLabel->"In[2]:=",ExpressionUUID->"97cd3aa9-ce94-449f-93cf-6922c0606f9b"],

Cell[BoxData["0"], "Output",
 CellChangeTimes->{3.8619801869530134`*^9},
 Background->RGBColor[1, 0.9, 0.8],
 CellLabel->"Out[2]=",ExpressionUUID->"365ca8e0-5324-4025-bcbf-66da8434ddd7"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"(*", "N\[AAcute]sobenie", "*)"}],
   FontColor->RGBColor[1, 0.5, 0]], "\[IndentingNewLine]", 
  RowBox[{"2", "*", "2"}]}]], "Input",
 CellChangeTimes->{{3.861980188403555*^9, 3.86198019800028*^9}},
 Background->GrayLevel[0.85],
 CellLabel->"In[3]:=",ExpressionUUID->"557b36f5-cdad-4297-9914-b29b9af21b93"],

Cell[BoxData["4"], "Output",
 CellChangeTimes->{3.8619801986960287`*^9},
 Background->RGBColor[1, 0.9, 0.8],
 CellLabel->"Out[3]=",ExpressionUUID->"7c93a78c-9893-4c6b-ac1e-29abba2c3345"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"(*", "Delenie", "*)"}],
   FontColor->RGBColor[1, 0.5, 0]], "\[IndentingNewLine]", 
  RowBox[{"2", "/", "2"}]}]], "Input",
 CellChangeTimes->{{3.861980201387022*^9, 3.8619802068560176`*^9}},
 Background->GrayLevel[0.85],
 CellLabel->"In[4]:=",ExpressionUUID->"0ada8d7f-e341-4110-93c0-8353330b1bb8"],

Cell[BoxData["1"], "Output",
 CellChangeTimes->{3.861980208218622*^9},
 Background->RGBColor[1, 0.9, 0.8],
 CellLabel->"Out[4]=",ExpressionUUID->"62811aef-9b72-487e-b511-182c15054c04"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"(*", 
    RowBox[{
    "V\[YAcute]po\[CHacek]et", " ", "s", " ", "desatinn\[YAcute]m", " ", 
     RowBox[{"\[CHacek]\[IAcute]slom", ".", " ", "Pri"}], " ", 
     "pou\[ZHacek]it\[IAcute]", " ", "desatinn\[EAcute]ho", " ", 
     "\[CHacek]\[IAcute]sla", " ", "sa", " ", "v\[YAcute]sledok", " ", 
     "automaticky", " ", "vyp\[IAcute]\[SHacek]e", " ", "vo", " ", "forme", 
     " ", "desatinn\[EAcute]ho", " ", "\[CHacek]isla"}], "*)"}],
   FontColor->RGBColor[1, 0.5, 0]], "\[IndentingNewLine]", 
  RowBox[{"5", " ", "+", " ", "1.5"}]}]], "Input",
 CellChangeTimes->{{3.861981935124095*^9, 3.8619819622581377`*^9}, {
  3.8619820085777116`*^9, 3.861982013521156*^9}, {3.8619822295767946`*^9, 
  3.8619822309383235`*^9}},
 Background->GrayLevel[
  0.85],ExpressionUUID->"37aa5865-2e14-4b0a-9aba-40c5ae1c352f"],

Cell[BoxData["6.5`"], "Output",
 CellChangeTimes->{{3.8619819421264715`*^9, 3.861981964101013*^9}, {
  3.8619820097800674`*^9, 3.861982015461501*^9}},
 Background->RGBColor[1, 0.9, 0.8],
 CellLabel->"Out[25]=",ExpressionUUID->"557b6332-78bd-4fb7-acb1-a59819867614"]
}, 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->"a6711393-137a-43df-9434-bcb2b593fcb3"],

Cell[TextData[StyleBox["Hodnoty vysledkov alebo aj in\[EAcute] hodnoty sa daj\
\[UAcute] uklada\[THacek] do premenn\[YAcute]ch ako tomu je aj pri \
in\[YAcute]ch programovac\[IAcute]ch jazykoch.",
 FontWeight->"Bold"]], "Text",
 CellChangeTimes->{{3.8619802354563913`*^9, 3.861980308160031*^9}},
 TextAlignment->Center,ExpressionUUID->"885f50a5-7ec9-4629-8fa7-6ff0138a5471"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"(*", 
    RowBox[{
    "Ulo\[ZHacek]enie", " ", "hodnoty", " ", "do", " ", "premennej", " ", 
     "X"}], " ", "*)"}],
   FontColor->RGBColor[1, 0.5, 0]], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"X", " ", "=", " ", "2"}], ";"}], "\[IndentingNewLine]", 
   StyleBox[
    RowBox[{"(*", 
     RowBox[{
     "Vyu\[ZHacek]itie", " ", "premennej", " ", "X", " ", "pri", " ", 
      "v\[YAcute]po\[CHacek]te"}], "*)"}],
    FontColor->RGBColor[1, 0.5, 0]], "\[IndentingNewLine]", 
   RowBox[{"3", " ", "+", " ", "X", " "}]}]}]], "Input",
 CellChangeTimes->{{3.8619803095954638`*^9, 3.861980372610198*^9}, {
  3.8619822490264482`*^9, 3.8619822501533585`*^9}},
 Background->GrayLevel[0.85],
 CellLabel->"In[26]:=",ExpressionUUID->"2534dc54-574b-4bc1-a275-48ec1335e5ef"],

Cell[BoxData["5"], "Output",
 CellChangeTimes->{{3.8619803689421153`*^9, 3.861980376770218*^9}, 
   3.861982256278242*^9},
 Background->RGBColor[1, 0.9, 0.8],
 CellLabel->"Out[27]=",ExpressionUUID->"3adf4203-e38f-4161-ac5a-acd440f4f8df"]
}, Open  ]],

Cell[BoxData[
 StyleBox[
  RowBox[{
   RowBox[{
   "Hodnoty", " ", "premenn\[YAcute]ch", " ", "sa", " ", "daju", " ", 
    "\:013eubovolne", " ", "prepisova\[THacek]", " ", "alebo", " ", 
    "maza\[THacek]"}], ",", " ", 
   RowBox[{
   "pre", " ", "prep\[IAcute]sanie", " ", "sta\[CHacek]i", " ", "iba", " ", 
    "do", " ", "premennej", " ", "vlo\[ZHacek]i\[THacek]", " ", 
    "nov\[UAcute]", " ", 
    RowBox[{"hodnotu", ".", " ", "Pre"}], " ", "\[UAcute]plne", " ", 
    "vymazanie", " ", "sa", " ", "pou\[ZHacek]\[IAcute]va", " ", "funkcia", 
    " ", 
    RowBox[{
    "\"\<\!\(\*StyleBox[\"Clear\",FontColor->RGBColor[1, 0, 0]]\)\>\"", 
     "."}]}]}], "Text",
  FontWeight->"Bold"]], "Input",
 CellChangeTimes->{{3.861981187211641*^9, 3.861981274057941*^9}},
 TextAlignment->Center,ExpressionUUID->"3732fafa-6f77-45b3-a76d-96b7497285fe"],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"(*", 
    RowBox[{
    "Zmazanie", " ", "hodnoty", " ", "z", " ", "premennej", " ", "X", " ", 
     "ktor\[AAcute]", " ", "bola", " ", "nastavena", " ", "na", " ", "2"}], 
    "*)"}],
   FontColor->RGBColor[1, 0.5, 0]], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{"Clear", "[", "X", "]"}], "\[IndentingNewLine]", "X"}]}]], "Input",
 CellChangeTimes->{{3.861981275164864*^9, 3.8619812835446796`*^9}, {
  3.8619823061693673`*^9, 3.8619823077862306`*^9}},
 Background->GrayLevel[0.85],
 CellLabel->"In[28]:=",ExpressionUUID->"f67d2bf1-04a5-4c1d-9b02-ee9a1c1d49d6"],

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"(*", 
    RowBox[{
    "Pr\[IAcute]kaz", " ", "\"\<X\>\"", " ", "po", " ", "vymazan\[IAcute]", 
     " ", "hodnoty", " ", "vyp\[IAcute]\[SHacek]e", " ", "iba", " ", 
     "\"\<X\>\"", " ", "preto\[ZHacek]e", " ", "v", " ", "\[NHacek]om", " ", 
     "nie", " ", "je", " ", "ulo\[ZHacek]en\[AAcute]", " ", "\[ZHacek]iadna", 
     " ", "hodnota"}], "*)"}],
   FontColor->RGBColor[1, 0.5, 0]], "\n", "X"}]], "Input",
 CellChangeTimes->{3.861982464925824*^9},
 Background->RGBColor[
  1, 0.9, 0.8],ExpressionUUID->"d7b698c9-900a-49d9-888f-888b2dc47523"],

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->"57f9878c-7974-4f91-9eaa-c6de2bd766d3"],

Cell[TextData[{
 StyleBox["Wolfram Language obsahuje nieko\:013eko tis\[IAcute]c funkci\
\[IAcute] ktor\[EAcute] pou\[ZHacek]\[IAcute]vate\:013eovi \[SHacek]etria \
\[CHacek]as, napr\[IAcute]klad funkcia \[OpenCurlyDoubleQuote]",
  FontWeight->"Bold"],
 StyleBox["Mean",
  FontWeight->"Bold",
  FontColor->RGBColor[1, 0, 0]],
 StyleBox["\[CloseCurlyDoubleQuote] ktor\[AAcute] za \
pou\[ZHacek]\[IAcute]vate\:013ea vyr\[AAcute]ta priemer zo zadan\[YAcute]ch \
\[CHacek]isiel bez toho aby musel cely vzorec na v\[YAcute]po\[CHacek]et \
priemeru p\[IAcute]sa\[THacek] s\[AAcute]m. Pre viac funkci\[IAcute] nav\
\[SHacek]t\[IAcute]vte ofici\[AAcute]lnu Wolfram dokument\[AAcute]ciu ",
  FontWeight->"Bold"],
 StyleBox[ButtonBox["https://reference.wolfram.com/language/",
  BaseStyle->"Hyperlink",
  ButtonData->{
    URL["https://reference.wolfram.com/language/"], None},
  ButtonNote->"https://reference.wolfram.com/language/"],
  FontWeight->"Bold"],
 StyleBox[".",
  FontWeight->"Bold"]
}], "Text",
 CellChangeTimes->{{3.861980440416828*^9, 3.8619805895682416`*^9}, {
  3.8619827952665443`*^9, 3.8619828619302316`*^9}},
 TextAlignment->Center,ExpressionUUID->"48f3f2d1-6aaa-478b-82f5-6d881ce44665"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"(*", 
    RowBox[{
    "V\[YAcute]po\[CHacek]et", " ", "priemeru", " ", "bez", " ", "funkcie", 
     " ", "Mean"}], " ", "*)"}],
   FontColor->RGBColor[1, 0.5, 0]], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{"(", 
    RowBox[{"5", "+", "5", "+", "5"}], ")"}], " ", "/", " ", "3"}]}]], "Input",
 CellChangeTimes->{{3.861980622892273*^9, 3.8619806436002927`*^9}, {
  3.861982346561887*^9, 3.8619823561133947`*^9}},
 Background->GrayLevel[0.85],
 CellLabel->"In[31]:=",ExpressionUUID->"25129232-388e-4027-8d10-363c44beb861"],

Cell[BoxData["5"], "Output",
 CellChangeTimes->{
  3.8619806446550283`*^9, {3.861982348108333*^9, 3.861982359472417*^9}},
 Background->RGBColor[1, 0.9, 0.8],
 CellLabel->"Out[31]=",ExpressionUUID->"83c4398c-ad4a-4d0e-818a-e46c3539ab80"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"(*", 
    RowBox[{
     RowBox[{
     "V\[YAcute]po\[CHacek]et", " ", "priemeru", " ", "s", " ", "funkciou", 
      " ", 
      RowBox[{"Mean", ":", "\[IndentingNewLine]", 
       RowBox[{
        RowBox[{"-", " ", "Zlo\[ZHacek]ene"}], " ", "z\[AAcute]tvorky", " ", 
        "funguj\[UAcute]", " ", "ako", " ", "pole", " ", 
        "jednotliv\[YAcute]ch", " ", 
        RowBox[{"hodn\[OHat]t", ".", " ", "\[IndentingNewLine]", 
         RowBox[{"-", " ", "Hran\[AAcute]te"}]}], " ", "z\[AAcute]tvorky", 
        " ", "funguj\[UAcute]", " ", "ako", " ", "telo", " ", "danej", " ", 
        "funkcie"}]}]}], ","}], "\[IndentingNewLine]", " ", "*)"}],
   FontColor->RGBColor[1, 0.5, 0]], "\[IndentingNewLine]", 
  RowBox[{"Mean", "[", 
   RowBox[{"{", 
    RowBox[{"5", ",", "5", ",", "5"}], "}"}], "]"}]}]], "Input",
 CellChangeTimes->{{3.861980756180546*^9, 3.8619807622574763`*^9}, {
  3.8619823701294193`*^9, 3.8619823711694183`*^9}},
 Background->GrayLevel[0.85],
 CellLabel->"In[32]:=",ExpressionUUID->"26935e5e-ec72-4982-862a-d981b0c81f01"],

Cell[BoxData["5"], "Output",
 CellChangeTimes->{3.8619823729095373`*^9},
 Background->RGBColor[1, 0.9, 0.8],
 CellLabel->"Out[32]=",ExpressionUUID->"c87c1f84-7a5e-4878-819f-4ca69a15cebc"]
}, 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->"38765bcb-4b93-4c8c-8441-fe495f6127ac"],

Cell[TextData[{
 StyleBox["Tvorba zlomkov je mo\[ZHacek]na v\[DHacek]aka kl\[AAcute]vesovej \
skratke ",
  FontWeight->"Bold"],
 StyleBox["CTRL + /  ",
  FontWeight->"Bold",
  FontColor->RGBColor[1, 0, 0]],
 StyleBox[".  T\[YAcute]m sa pou\[ZHacek]\[IAcute]vate\:013eovi vytvor\
\[IAcute] zlomok do ktor\[EAcute]ho m\[OHat]\[ZHacek]e \
zad\[AAcute]va\[THacek] vlastn\[EAcute] hodnoty.",
  FontWeight->"Bold",
  FontColor->GrayLevel[0]]
}], "Text",
 CellChangeTimes->{{3.8619816378949256`*^9, 3.8619817924494157`*^9}},
 TextAlignment->Center,ExpressionUUID->"3784ffc5-419a-42f7-a29c-63c72b19a575"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"(*", 
    RowBox[{
    "Pr\[IAcute]klad", " ", "v\[YAcute]po\[CHacek]tu", " ", 
     "jednoduch\[EAcute]ho", " ", "zlomku"}], "*)"}],
   FontColor->RGBColor[1, 0.5, 0]], "\n", 
  RowBox[{
   FractionBox["1", "2"], "+", 
   FractionBox["1", "2"]}]}]], "Input",
 CellChangeTimes->{3.861982450368311*^9},
 Background->GrayLevel[
  0.85],ExpressionUUID->"1065243b-56af-4278-9483-ee34e2109f60"],

Cell[BoxData["1"], "Output",
 CellChangeTimes->{3.8619818098580036`*^9},
 Background->RGBColor[1, 0.9, 0.8],
 CellLabel->"Out[19]=",ExpressionUUID->"e0afcdba-b273-4bb6-b93a-8b8db7f562ec"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"(*", 
    RowBox[{
    "Pr\[IAcute]klad", " ", "v\[YAcute]po\[CHacek]tu", " ", 
     "zlo\[ZHacek]itej\[SHacek]ieho", " ", "zlomku"}], "*)"}],
   FontColor->RGBColor[1, 0.5, 0]], "\n", 
  RowBox[{
   FractionBox["1", 
    RowBox[{"2", "*", "5"}]], " ", "+", "  ", 
   FractionBox[
    RowBox[{
     FractionBox["4", "3"], "+", 
     FractionBox["2", "3"]}], "2.4"], " "}]}]], "Input",
 CellChangeTimes->{{3.861981878505954*^9, 3.8619818833782587`*^9}, 
   3.861982455705784*^9, {3.8621579987095556`*^9, 3.8621580074539576`*^9}},
 Background->GrayLevel[0.85],
 CellLabel->"In[1]:=",ExpressionUUID->"6e6af5d5-2cdb-4276-be3b-4cab9b878464"],

Cell[BoxData["0.9333333333333333`"], "Output",
 CellChangeTimes->{3.8619818722170687`*^9, 3.8621580105115857`*^9},
 Background->RGBColor[1, 0.9, 0.8],
 CellLabel->"Out[1]=",ExpressionUUID->"02f77c73-3472-4d7f-980e-da9c26f53ff5"]
}, 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->"7cacb1be-f782-42de-8661-eb6da249ebed"],

Cell[TextData[StyleBox["Tvorba funkci\[IAcute]",
 FontWeight->"Bold"]], "Text",
 CellChangeTimes->{{3.862025322408199*^9, 3.8620253752687616`*^9}, 
   3.862026093804467*^9},
 TextAlignment->Center,ExpressionUUID->"dc150b45-745b-4723-823e-3da777c0a9dd"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{
   StyleBox["(*",
    FontColor->RGBColor[1, 0.5, 0]], 
   RowBox[{
    RowBox[{
     StyleBox["Funkcie",
      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["tvoria",
      FontColor->RGBColor[1, 0.5, 0]], 
     StyleBox[" ",
      FontColor->RGBColor[1, 0.5, 0]], 
     StyleBox["v",
      FontColor->RGBColor[1, 0.5, 0]], 
     StyleBox[" ",
      FontColor->RGBColor[1, 0.5, 0]], 
     StyleBox["tvare",
      FontColor->RGBColor[1, 0.5, 0]], 
     StyleBox[" ",
      FontColor->RGBColor[1, 0.5, 0]], 
     StyleBox[
      RowBox[{"F", "[", "x_", "]"}],
      FontColor->RGBColor[1, 0, 0]], 
     StyleBox[" ",
      FontColor->RGBColor[1, 0.5, 0]], 
     StyleBox["kde",
      FontColor->RGBColor[1, 0.5, 0]], 
     StyleBox[" ",
      FontColor->RGBColor[1, 0.5, 0]], 
     StyleBox["F",
      FontColor->RGBColor[1, 0, 1]], 
     StyleBox[" ",
      FontColor->RGBColor[1, 0, 1]], 
     StyleBox["je",
      FontColor->RGBColor[1, 0, 1]], 
     StyleBox[" ",
      FontColor->RGBColor[1, 0, 1]], 
     StyleBox["n\[AAcute]zov",
      FontColor->RGBColor[1, 0, 1]], 
     StyleBox[" ",
      FontColor->RGBColor[1, 0.5, 0]], 
     StyleBox["funkcie",
      FontColor->RGBColor[1, 0.5, 0]], 
     StyleBox[" ",
      FontColor->RGBColor[1, 0.5, 0]], 
     StyleBox["a",
      FontColor->RGBColor[1, 0.5, 0]], 
     StyleBox[" ",
      FontColor->RGBColor[1, 0.5, 0]], 
     StyleBox["x_",
      FontColor->RGBColor[1, 0, 1]], 
     StyleBox[" ",
      FontColor->RGBColor[1, 0, 1]], 
     StyleBox["je",
      FontColor->RGBColor[1, 0, 1]], 
     StyleBox[" ",
      FontColor->RGBColor[1, 0, 1]], 
     StyleBox["n\[AAcute]zov",
      FontColor->RGBColor[1, 0, 1]], 
     StyleBox[" ",
      FontColor->RGBColor[1, 0, 1]], 
     StyleBox["premennej",
      FontColor->RGBColor[1, 0, 1]]}], 
    StyleBox[" ",
     FontColor->RGBColor[1, 0, 1]], 
    StyleBox[",",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox[" ",
     FontColor->RGBColor[1, 0.5, 0]], 
    RowBox[{
     StyleBox[
      RowBox[{
      "po", " ", "zadefinovan\[IAcute]", " ", "funkcie", " ", 
       "n\[AAcute]sleduj\[UAcute]", " ", "znamienka"}],
      FontColor->RGBColor[1, 0.5, 0]], 
     StyleBox[" ",
      FontColor->RGBColor[1, 0.5, 0]], 
     StyleBox[":=",
      FontColor->RGBColor[1, 0, 1]], 
     StyleBox[" ",
      FontColor->RGBColor[1, 0.5, 0]], 
     StyleBox[
      RowBox[{
      "ktor\[EAcute]", " ", "definuj\[UAcute]", " ", "\[ZHacek]e", " ", 
       "dan\[YAcute]", " ", "v\[YAcute]raz", " ", "je", " ", "funkcia"}],
      FontColor->RGBColor[1, 0.5, 0]]}]}], 
   StyleBox[" ",
    FontColor->RGBColor[1, 0, 1]], 
   StyleBox["*)",
    FontColor->RGBColor[1, 0.5, 0]]}], 
  StyleBox["\[IndentingNewLine]",
   FontColor->RGBColor[1, 0.5, 0]], 
  StyleBox["\[IndentingNewLine]",
   FontColor->RGBColor[1, 0.5, 0]], 
  RowBox[{
   StyleBox["(*",
    FontColor->RGBColor[1, 0.5, 0]], 
   RowBox[{
    StyleBox["Vytvorenie",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox[" ",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox["jednoduchej",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox[" ",
     FontColor->RGBColor[1, 0.5, 0]], 
    StyleBox[
     RowBox[{
      StyleBox["f",
       FontColor->RGBColor[1, 0.5, 0]], 
      StyleBox["unkcie",
       FontColor->RGBColor[1, 0.5, 0]]}]]}], 
   StyleBox["*)",
    FontColor->RGBColor[1, 0.5, 0]]}], "\[IndentingNewLine]", 
  RowBox[{
   RowBox[{
    RowBox[{"Funkcia", "[", "x_", " ", "]"}], " ", ":=", " ", 
    RowBox[{"0", " ", "+", " ", "x"}]}], "\[IndentingNewLine]", 
   StyleBox[
    RowBox[{"(*", 
     RowBox[{
      RowBox[{
      "Zavolanie", " ", "funkcie", " ", "a", " ", "dosadenie", " ", "hodnoty",
        " ", "do", " ", "premennej"}], " ", "-", " ", 
      RowBox[{
      "v", " ", "tomto", " ", "pr\[IAcute]pade", " ", "vznikne", " ", 
       "rovnica", " ", "0"}], " ", "+", " ", 
      RowBox[{
      "5", " ", "preto\[ZHacek]e", " ", "sme", " ", "do", " ", "premennej", 
       " ", "X", " ", "priradili", " ", "hodnotu", " ", "5"}]}], "*)"}],
    FontColor->RGBColor[1, 0.5, 0]], "\[IndentingNewLine]", 
   RowBox[{"Funkcia", "[", "5", "]"}]}]}]], "Input",
 CellChangeTimes->{{3.86198266930322*^9, 3.861982672281577*^9}, {
  3.8620252298125753`*^9, 3.8620253087801027`*^9}, {3.8620253830212145`*^9, 
  3.8620254254362707`*^9}, {3.862025483037306*^9, 3.862025582701167*^9}, {
  3.8620256622934227`*^9, 3.862025710885429*^9}},
 Background->GrayLevel[
  0.85],ExpressionUUID->"0ce2e3a1-c0bb-4cf7-9b67-ef5fa98988e7"],

Cell[BoxData["5"], "Output",
 CellChangeTimes->{{3.862025253968745*^9, 3.862025309373962*^9}, 
   3.862025577560441*^9},
 Background->RGBColor[1, 0.9, 0.8],
 CellLabel->"Out[18]=",ExpressionUUID->"15308a00-589c-44c3-8633-7b4441f0bc0e"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"(*", 
    RowBox[{
    "Vytvorenie", " ", "funkcie", " ", "s", " ", "viacer\[YAcute]mi", " ", 
     "premenn\[YAcute]mi"}], "*)"}],
   FontColor->RGBColor[1, 0.5, 0]], "\n", 
  RowBox[{
   RowBox[{
    RowBox[{"Funkcia2", "[", 
     RowBox[{"x_", " ", ",", " ", "y_", ",", " ", "z_"}], "]"}], " ", ":=", 
    " ", 
    RowBox[{"x", " ", "+", " ", "y", "+", " ", "z"}]}], "\[IndentingNewLine]", 
   RowBox[{"Funkcia2", "[", 
    RowBox[{"1", ",", "2", ",", "3"}], "]"}], " "}]}]], "Input",
 CellChangeTimes->{{3.8620256129513693`*^9, 3.862025635964406*^9}, 
   3.862025752363862*^9, {3.86215930218946*^9, 3.8621593033574333`*^9}},
 Background->GrayLevel[0.85],
 CellLabel->"In[4]:=",ExpressionUUID->"3ff68af1-f38d-4703-8cbf-05664dfb5023"],

Cell[BoxData["6"], "Output",
 CellChangeTimes->{
  3.862025746941454*^9, {3.8621592919316006`*^9, 3.862159304727378*^9}},
 Background->RGBColor[1, 0.9, 0.8],
 CellLabel->"Out[5]=",ExpressionUUID->"1fda8807-1c22-4341-a4d2-76354bfd759c"]
}, 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->"fc35436c-2622-4181-8216-95cc6fefafe3"],

Cell[BoxData[
 StyleBox[
  RowBox[{
   RowBox[{"Tvorba", " ", 
    StyleBox[
     RowBox[{"m", 
      StyleBox["o", "Text",
       FontWeight->"Bold"], "cn", 
      StyleBox["\[IAcute]", "Text",
       FontWeight->"Bold"], 
      StyleBox[
       StyleBox["n", "Text",
        FontWeight->"Bold"], "Text",
       FontWeight->"Bold"]}]], 
    StyleBox[" ", "Text",
     FontWeight->"Bold"], 
    StyleBox["je", "Text",
     FontWeight->"Bold"], 
    StyleBox[" ", "Text",
     FontWeight->"Bold"], 
    StyleBox[
     RowBox[{
      StyleBox["mo", "Text",
       FontWeight->"Bold"], "\[ZHacek]n", 
      StyleBox["\[AAcute]", "Text",
       FontWeight->"Bold"]}]], 
    StyleBox[" ", "Text",
     FontWeight->"Bold"], 
    StyleBox[
     RowBox[{"v", 
      StyleBox["\[DHacek]", "Text",
       FontWeight->"Bold"], "ak", 
      StyleBox["a", "Text",
       FontWeight->"Bold"]}]], 
    StyleBox[" ", "Text",
     FontWeight->"Bold"], 
    StyleBox[
     RowBox[{
      StyleBox[
       StyleBox[
        StyleBox["k", "Text",
         FontWeight->"Bold"], "Text",
        FontWeight->"Bold"], "Text",
       FontWeight->"Bold"], "l\[AAcute]", 
      StyleBox["v", "Text",
       FontWeight->"Bold"], "es", 
      StyleBox["o", "Text",
       FontWeight->"Bold"], "ve", 
      StyleBox["j", "Text",
       FontWeight->"Bold"]}]], 
    StyleBox[" ", "Text",
     FontWeight->"Bold"], 
    StyleBox[
     RowBox[{
      StyleBox[
       StyleBox[
        StyleBox["s", "Text",
         FontWeight->"Bold"], "Text",
        FontWeight->"Bold"], "Text",
       FontWeight->"Bold"], "kr", 
      StyleBox["a", "Text",
       FontWeight->"Bold"], "tk", 
      StyleBox["e", "Text",
       FontWeight->"Bold"]}]], 
    StyleBox[" ", "Text",
     FontWeight->"Bold"], 
    StyleBox[
     RowBox[{
      StyleBox[
       StyleBox[
        StyleBox["C", "Text",
         FontWeight->"Bold"], "Text",
        FontWeight->"Bold"], "Text",
       FontWeight->"Bold"], "T", 
      StyleBox["R", "Text",
       FontWeight->"Bold"], 
      StyleBox[
       StyleBox["L", "Text",
        FontWeight->"Bold"], "Text",
       FontWeight->"Bold"]}]]}], 
   StyleBox[" ", "Text",
    FontWeight->"Bold"], 
   StyleBox["+", "Text",
    FontWeight->"Bold"], " ", 
   RowBox[{
    RowBox[{"6", " ", 
     StyleBox[".", "Text",
      FontWeight->"Bold"], 
     StyleBox[" ", "Text",
      FontWeight->"Bold"], 
     StyleBox[
      RowBox[{
       StyleBox[
        StyleBox["T", "Text",
         FontWeight->"Bold"], "Text",
        FontWeight->"Bold"], "\[YAcute]m"}]]}], 
    StyleBox[" ", "Text",
     FontWeight->"Bold"], 
    StyleBox[
     RowBox[{
      StyleBox[
       StyleBox[
        StyleBox["s", "Text",
         FontWeight->"Bold"], "Text",
        FontWeight->"Bold"], "Text",
       FontWeight->"Bold"], 
      StyleBox[
       StyleBox["a", "Text",
        FontWeight->"Bold"], "Text",
       FontWeight->"Bold"]}], "Text",
     FontWeight->"Bold"], 
    StyleBox[" ", "Text",
     FontWeight->"Bold"], 
    RowBox[{
     StyleBox[
      RowBox[{
       StyleBox[
        StyleBox[
         StyleBox[
          StyleBox["p", "Text",
           FontWeight->"Bold"], "Text",
          FontWeight->"Bold"], "Text",
         FontWeight->"Bold"], "Text",
        FontWeight->"Bold"], "ou", 
       StyleBox[
        StyleBox["\[ZHacek]", "Text",
         FontWeight->"Bold"], "Text",
        FontWeight->"Bold"], "\[IAcute]", 
       StyleBox[
        StyleBox["v", "Text",
         FontWeight->"Bold"], "Text",
        FontWeight->"Bold"], "at", 
       StyleBox[
        StyleBox["e", "Text",
         FontWeight->"Bold"], "Text",
        FontWeight->"Bold"], "\:013eo"}]], 
     StyleBox[
      StyleBox["v", "Text",
       FontWeight->"Bold"], "Text",
      FontWeight->"Bold"], 
     StyleBox[
      StyleBox[
       StyleBox["i", "Text",
        FontWeight->"Bold"], "Text",
       FontWeight->"Bold"], "Text",
      FontWeight->"Bold"]}], 
    StyleBox[" ", "Text",
     FontWeight->"Bold"], 
    StyleBox[
     RowBox[{
      StyleBox[
       StyleBox[
        StyleBox[
         StyleBox["v", "Text",
          FontWeight->"Bold"], "Text",
         FontWeight->"Bold"], "Text",
        FontWeight->"Bold"], "Text",
       FontWeight->"Bold"], "yt", 
      StyleBox[
       StyleBox["v", "Text",
        FontWeight->"Bold"], "Text",
       FontWeight->"Bold"], "or", 
      StyleBox[
       StyleBox["\[IAcute]", "Text",
        FontWeight->"Bold"], "Text",
       FontWeight->"Bold"]}]], 
    StyleBox[" ", "Text",
     FontWeight->"Bold"], 
    StyleBox[
     RowBox[{
      StyleBox[
       StyleBox[
        StyleBox[
         StyleBox["\[CHacek]", "Text",
          FontWeight->"Bold"], "Text",
         FontWeight->"Bold"], "Text",
        FontWeight->"Bold"], "Text",
       FontWeight->"Bold"], "is", 
      StyleBox[
       StyleBox["l", "Text",
        FontWeight->"Bold"], "Text",
       FontWeight->"Bold"], 
      StyleBox[
       StyleBox[
        StyleBox["o", "Text",
         FontWeight->"Bold"], "Text",
        FontWeight->"Bold"], "Text",
       FontWeight->"Bold"]}]], 
    StyleBox[" ", "Text",
     FontWeight->"Bold"], 
    StyleBox[
     StyleBox[
      StyleBox[
       StyleBox["s", "Text",
        FontWeight->"Bold"], "Text",
       FontWeight->"Bold"], "Text",
      FontWeight->"Bold"], "Text",
     FontWeight->"Bold"], 
    StyleBox[" ", "Text",
     FontWeight->"Bold"], 
    StyleBox[
     RowBox[{
      StyleBox[
       StyleBox[
        StyleBox[
         StyleBox["m", "Text",
          FontWeight->"Bold"], "Text",
         FontWeight->"Bold"], "Text",
        FontWeight->"Bold"], "Text",
       FontWeight->"Bold"], "o", 
      StyleBox[
       StyleBox["c", "Text",
        FontWeight->"Bold"], "Text",
       FontWeight->"Bold"], "ni", 
      StyleBox[
       StyleBox["n", "Text",
        FontWeight->"Bold"], "Text",
       FontWeight->"Bold"], "ou"}]], 
    StyleBox[" ", "Text",
     FontWeight->"Bold"], 
    StyleBox[
     RowBox[{
      StyleBox[
       StyleBox[
        StyleBox["d", "Text",
         FontWeight->"Bold"], "Text",
        FontWeight->"Bold"], "Text",
       FontWeight->"Bold"], 
      StyleBox[
       StyleBox["o", "Text",
        FontWeight->"Bold"], "Text",
       FontWeight->"Bold"]}], "Text",
     FontWeight->"Bold"], 
    StyleBox[" ", "Text",
     FontWeight->"Bold"], 
    StyleBox[
     RowBox[{
      StyleBox[
       StyleBox[
        StyleBox[
         StyleBox["k", "Text",
          FontWeight->"Bold"], "Text",
         FontWeight->"Bold"], "Text",
        FontWeight->"Bold"], "Text",
       FontWeight->"Bold"], "to", 
      StyleBox[
       StyleBox["r", "Text",
        FontWeight->"Bold"], "Text",
       FontWeight->"Bold"], "\[EAcute]h", 
      StyleBox[
       StyleBox["o", "Text",
        FontWeight->"Bold"], "Text",
       FontWeight->"Bold"]}]], 
    StyleBox[" ", "Text",
     FontWeight->"Bold"], 
    StyleBox[
     RowBox[{
      StyleBox[
       StyleBox[
        StyleBox[
         StyleBox["m", "Text",
          FontWeight->"Bold"], "Text",
         FontWeight->"Bold"], "Text",
        FontWeight->"Bold"], "Text",
       FontWeight->"Bold"], "\[OHat]\[ZHacek]", 
      StyleBox[
       StyleBox["e", "Text",
        FontWeight->"Bold"], "Text",
       FontWeight->"Bold"]}]], 
    StyleBox[" ", "Text",
     FontWeight->"Bold"], 
    StyleBox[
     RowBox[{
      StyleBox[
       StyleBox[
        StyleBox[
         StyleBox["z", "Text",
          FontWeight->"Bold"], "Text",
         FontWeight->"Bold"], "Text",
        FontWeight->"Bold"], "Text",
       FontWeight->"Bold"], "ad", 
      StyleBox[
       StyleBox["\[AAcute]", "Text",
        FontWeight->"Bold"], "Text",
       FontWeight->"Bold"], "va", 
      StyleBox[
       StyleBox["\[THacek]", "Text",
        FontWeight->"Bold"], "Text",
       FontWeight->"Bold"]}]], 
    StyleBox[" ", "Text",
     FontWeight->"Bold"], 
    StyleBox[
     RowBox[{
      StyleBox[
       StyleBox[
        StyleBox[
         StyleBox["v", "Text",
          FontWeight->"Bold"], "Text",
         FontWeight->"Bold"], "Text",
        FontWeight->"Bold"], "Text",
       FontWeight->"Bold"], "la", 
      StyleBox[
       StyleBox["s", "Text",
        FontWeight->"Bold"], "Text",
       FontWeight->"Bold"], "tn", 
      StyleBox[
       StyleBox["\[EAcute]", "Text",
        FontWeight->"Bold"], "Text",
       FontWeight->"Bold"]}]], 
    StyleBox[" ", "Text",
     FontWeight->"Bold"], 
    RowBox[{
     StyleBox[
      RowBox[{
       StyleBox[
        StyleBox[
         StyleBox[
          StyleBox["h", "Text",
           FontWeight->"Bold"], "Text",
          FontWeight->"Bold"], "Text",
         FontWeight->"Bold"], "Text",
        FontWeight->"Bold"], "od", 
       StyleBox[
        StyleBox["n", "Text",
         FontWeight->"Bold"], "Text",
        FontWeight->"Bold"], "ot", 
       StyleBox[
        StyleBox["y", "Text",
         FontWeight->"Bold"], "Text",
        FontWeight->"Bold"]}]], 
     StyleBox[
      StyleBox[
       StyleBox[".", "Text",
        FontWeight->"Bold"], "Text",
       FontWeight->"Bold"], "Text",
      FontWeight->"Bold"]}]}]}], "Text",
  FontWeight->"Bold"]], "Input",
 CellChangeTimes->{{3.8620259599791646`*^9, 3.862025966940596*^9}, {
  3.862026006388588*^9, 3.862026091990672*^9}},
 TextAlignment->Center,ExpressionUUID->"471e1fa5-b4f0-4e13-9a41-88acfb81ccf6"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"(*", 
    RowBox[{"Vytvorenie", " ", "jednoduchej", " ", "mocniny"}], "*)"}],
   FontColor->RGBColor[1, 0.5, 0]], "\n", 
  SuperscriptBox["2", "2"]}]], "Input",
 CellChangeTimes->{{3.8620261043006835`*^9, 3.862026109188525*^9}, 
   3.8620261572769384`*^9},
 Background->GrayLevel[
  0.85],ExpressionUUID->"33fc87b4-8cc1-4856-a524-b5ea65ec603c"],

Cell[BoxData["4"], "Output",
 CellChangeTimes->{3.8620261193007097`*^9},
 Background->RGBColor[1, 0.9, 0.8],
 CellLabel->"Out[25]=",ExpressionUUID->"1997f8e8-6406-4b57-958d-1dd6bb27871f"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"(*", 
    RowBox[{
    "Vytvorenie", " ", "zlo\[ZHacek]itej", " ", "rovnice", " ", "s", "  ", 
     "mocninami"}], "*)"}],
   FontColor->RGBColor[1, 0.5, 0]], "\n", 
  RowBox[{
   SuperscriptBox["2", 
    RowBox[{"2", "+", "2"}]], " ", "+", " ", 
   SuperscriptBox["1", "1"]}]}]], "Input",
 CellChangeTimes->{{3.8620261238055363`*^9, 3.862026153279707*^9}, {
  3.8621530451382637`*^9, 3.862153048546499*^9}},
 Background->GrayLevel[
  0.85],ExpressionUUID->"c62fc1a9-f2d9-4ac5-95d4-7f42ef1a3e39"],

Cell[BoxData["17"], "Output",
 CellChangeTimes->{3.8620261477935214`*^9},
 Background->RGBColor[1, 0.9, 0.8],
 CellLabel->"Out[26]=",ExpressionUUID->"2aec64d3-25f5-4027-a683-0b810014e375"]
}, 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->"cf48eafe-97cc-4cfb-8df3-9c2d097a2376"],

Cell[TextData[StyleBox["\[CapitalDHacek]a\:013e\[SHacek]ie zauj\[IAcute]mav\
\[EAcute] funkcie:",
 FontWeight->"Bold"]], "Text",
 CellChangeTimes->{{3.8620267349061785`*^9, 3.8620267570691266`*^9}},
 TextAlignment->Center,ExpressionUUID->"4acb5987-1788-422d-8787-56f7fcaa65f8"],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  StyleBox[
   RowBox[{"(*", 
    RowBox[{"Faktorial", " ", 
     RowBox[{"(", 
      RowBox[{"5", "*", "4", "*", "3", "*", "2", "*", "1"}], ")"}]}], " ", 
    "*)"}],
   FontColor->RGBColor[1, 0.5, 0]], "\[IndentingNewLine]", 
  RowBox[{"5", "!"}]}]], "Input",
 CellChangeTimes->{{3.8620267605521126`*^9, 3.8620268030544195`*^9}},
 Background->GrayLevel[
  0.85],ExpressionUUID->"de623967-2245-46d4-81fa-851356294c59"],

Cell[BoxData["120"], "Output",
 CellChangeTimes->{3.862026782794095*^9},
 Background->RGBColor[1, 0.9, 0.8],
 CellLabel->"Out[27]=",ExpressionUUID->"433c4204-bc72-4f58-8a3b-e20c1809da0d"]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{
  RowBox[{
   StyleBox["(*",
    FontColor->RGBColor[1, 0.5, 0]], 
   RowBox[{
    RowBox[{
     StyleBox["Funkcia",
      FontColor->RGBColor[1, 0.5, 0]], 
     StyleBox[" ",
      FontColor->RGBColor[1, 0.5, 0]], 
     StyleBox["Solve",
      FontColor->RGBColor[1, 0, 0]], 
     StyleBox[" ",
      FontColor->RGBColor[1, 0.5, 0]], 
     StyleBox["vypo\[CHacek]\[IAcute]ta",
      FontColor->RGBColor[1, 0.5, 0]], 
     StyleBox[" ",
      FontColor->RGBColor[1, 0.5, 0]], 
     StyleBox["hodnotu",
      FontColor->RGBColor[1, 0.5, 0]], 
     StyleBox[" ",
      FontColor->RGBColor[1, 0.5, 0]], 
     StyleBox["po\[ZHacek]adovanej",
      FontColor->RGBColor[1, 0.5, 0]], 
     StyleBox[" ",
      FontColor->RGBColor[1, 0.5, 0]], 
     StyleBox["premennej",
      FontColor->RGBColor[1, 0.5, 0]], 
     StyleBox[" ",
      FontColor->RGBColor[1, 0.5, 0]], 
     StyleBox["z",
      FontColor->RGBColor[1, 0.5, 0]], 
     StyleBox[" ",
      FontColor->RGBColor[1, 0.5, 0]], 
     StyleBox["danej",
      FontColor->RGBColor[1, 0.5, 0]], 
     StyleBox[" ",
      FontColor->RGBColor[1, 0.5, 0]], 
     StyleBox[
      RowBox[{"rovnice", ".", " ", "Po\[ZHacek]adovan\[AAcute]"}],
      FontColor->RGBColor[1, 0.5, 0]], 
     StyleBox[" ",
      FontColor->RGBColor[1, 0.5, 0]], 
     StyleBox["premenn\[AAcute]",
      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["zad\[AAcute]va",
      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]], 
     StyleBox["koniec",
      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]], 
    StyleBox[" ",
     FontColor->RGBColor[1, 0.5, 0]], 
    RowBox[{
     StyleBox["v",
      FontColor->RGBColor[1, 0.5, 0]], 
     StyleBox[
      StyleBox[
       RowBox[{" ", " "}]],
      FontColor->RGBColor[1, 0.5, 0]], 
     StyleBox["na\[SHacek]om",
      FontColor->RGBColor[1, 0.5, 0]], 
     StyleBox[" ",
      FontColor->RGBColor[1, 0.5, 0]], 
     StyleBox["pr\[IAcute]pade",
      FontColor->RGBColor[1, 0.5, 0]], 
     StyleBox[" ",
      FontColor->RGBColor[1, 0.5, 0]], 
     StyleBox["to",
      FontColor->RGBColor[1, 0.5, 0]], 
     StyleBox[" ",
      FontColor->RGBColor[1, 0.5, 0]], 
     StyleBox["je",
      FontColor->RGBColor[1, 0.5, 0]], 
     StyleBox[
      StyleBox[
       RowBox[{" ", " "}]],
      FontColor->RGBColor[1, 0.5, 0]], 
     StyleBox["x",
      FontColor->RGBColor[1, 0, 1]]}]}], 
   StyleBox[" ",
    FontColor->RGBColor[1, 0.5, 0]], 
   StyleBox[
    StyleBox[
     RowBox[{"*", ")"}]],
    FontColor->RGBColor[1, 0.5, 0]]}], "\[IndentingNewLine]", 
  RowBox[{"Solve", "[", 
   RowBox[{
    RowBox[{
     RowBox[{
      RowBox[{"2", "x"}], " ", "+", " ", 
      RowBox[{"1", "x"}]}], " ", "==", " ", "3"}], ",", "  ", 
    StyleBox["x",
     FontColor->RGBColor[1, 0, 1]]}], "]"}]}]], "Input",
 CellChangeTimes->{{3.8620270034405394`*^9, 3.862027085934336*^9}},
 Background->GrayLevel[
  0.85],ExpressionUUID->"56d411a5-07cf-410a-bbac-c30e9bfdabff"],

Cell[BoxData[
 RowBox[{"{", 
  RowBox[{"{", 
   RowBox[{"x", "\[Rule]", "1"}], "}"}], "}"}]], "Output",
 CellChangeTimes->{{3.8620270181242733`*^9, 3.8620270302467313`*^9}},
 Background->RGBColor[1, 0.9, 0.8],
 CellLabel->"Out[37]=",ExpressionUUID->"1c192996-45d8-40fa-b802-0f2af9538f9e"]
}, Open  ]]
}, Open  ]]
},
WindowSize->{1440., 777.75},
WindowMargins->{{Automatic, 1434}, {-3, Automatic}},
SpellingDictionaries->{"CorrectWords"->{
 "matematick\[EAcute]", "oper\[AAcute]cie", "Z\[AAcute]kladn\[EAcute]", 
  "Tento"}},
Magnification:>1.2 Inherited,
FrontEndVersion->"13.0 for Microsoft Windows (64-bit) (February 4, 2022)",
StyleDefinitions->"Default.nb",
ExpressionUUID->"f3a047bd-9897-4af6-b14d-5d5b515c2663"
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[CellGroupData[{
Cell[580, 22, 253, 3, 117, "Title",ExpressionUUID->"0567922c-1549-4811-8d7e-cc8828342732"],
Cell[836, 27, 743, 11, 42, "Text",ExpressionUUID->"df1e7302-b946-456c-962b-45bbf39292ee"],
Cell[1582, 40, 251, 5, 42, "Text",ExpressionUUID->"d5eec622-b756-4fd7-a98b-4d0e98b60670"],
Cell[1836, 47, 719, 11, 173, "Text",ExpressionUUID->"3dcffe61-2432-49cc-acea-4de5fd5d965b"],
Cell[2558, 60, 1048, 41, 32, "Input",ExpressionUUID->"19d14b74-da63-4662-a730-cee7380a0426"],
Cell[3609, 103, 327, 10, 12, "Text",ExpressionUUID->"d66e855f-4aae-4953-bf43-a45c51df09c3"],
Cell[3939, 115, 267, 4, 40, "Text",ExpressionUUID->"322ac609-53d9-4a99-8668-4be1b94dff9a"],
Cell[4209, 121, 1402, 35, 169, "Text",ExpressionUUID->"88a8ebed-de70-4d7a-b2b2-bb7834321317"],
Cell[5614, 158, 184, 3, 72, "Output",ExpressionUUID->"39fd3f01-35a9-4b63-a7a9-90ca3c30feaa"],
Cell[CellGroupData[{
Cell[5823, 165, 359, 8, 90, "Input",ExpressionUUID->"97cd3aa9-ce94-449f-93cf-6922c0606f9b"],
Cell[6185, 175, 186, 3, 72, "Output",ExpressionUUID->"365ca8e0-5324-4025-bcbf-66da8434ddd7"]
}, Open  ]],
Cell[CellGroupData[{
Cell[6408, 183, 353, 8, 90, "Input",ExpressionUUID->"557b36f5-cdad-4297-9914-b29b9af21b93"],
Cell[6764, 193, 186, 3, 57, "Output",ExpressionUUID->"7c93a78c-9893-4c6b-ac1e-29abba2c3345"]
}, Open  ]],
Cell[CellGroupData[{
Cell[6987, 201, 346, 8, 76, "Input",ExpressionUUID->"0ada8d7f-e341-4110-93c0-8353330b1bb8"],
Cell[7336, 211, 184, 3, 57, "Output",ExpressionUUID->"62811aef-9b72-487e-b511-182c15054c04"]
}, Open  ]],
Cell[CellGroupData[{
Cell[7557, 219, 855, 17, 76, "Input",ExpressionUUID->"37aa5865-2e14-4b0a-9aba-40c5ae1c352f"],
Cell[8415, 238, 265, 4, 57, "Output",ExpressionUUID->"557b6332-78bd-4fb7-acb1-a59819867614"]
}, Open  ]],
Cell[8695, 245, 327, 10, 12, "Text",ExpressionUUID->"a6711393-137a-43df-9434-bcb2b593fcb3"],
Cell[9025, 257, 374, 5, 42, "Text",ExpressionUUID->"885f50a5-7ec9-4629-8fa7-6ff0138a5471"],
Cell[CellGroupData[{
Cell[9424, 266, 827, 21, 122, "Input",ExpressionUUID->"2534dc54-574b-4bc1-a275-48ec1335e5ef"],
Cell[10254, 289, 237, 4, 57, "Output",ExpressionUUID->"3adf4203-e38f-4161-ac5a-acd440f4f8df"]
}, Open  ]],
Cell[10506, 296, 846, 19, 65, "Input",ExpressionUUID->"3732fafa-6f77-45b3-a76d-96b7497285fe"],
Cell[11355, 317, 611, 14, 99, "Input",ExpressionUUID->"f67d2bf1-04a5-4c1d-9b02-ee9a1c1d49d6"],
Cell[11969, 333, 596, 13, 76, "Input",ExpressionUUID->"d7b698c9-900a-49d9-888f-888b2dc47523"],
Cell[12568, 348, 327, 10, 12, "Text",ExpressionUUID->"57f9878c-7974-4f91-9eaa-c6de2bd766d3"],
Cell[12898, 360, 1197, 25, 97, "Text",ExpressionUUID->"48f3f2d1-6aaa-478b-82f5-6d881ce44665"],
Cell[CellGroupData[{
Cell[14120, 389, 572, 14, 76, "Input",ExpressionUUID->"25129232-388e-4027-8d10-363c44beb861"],
Cell[14695, 405, 236, 4, 57, "Output",ExpressionUUID->"83c4398c-ad4a-4d0e-818a-e46c3539ab80"]
}, Open  ]],
Cell[CellGroupData[{
Cell[14968, 414, 1093, 24, 145, "Input",ExpressionUUID->"26935e5e-ec72-4982-862a-d981b0c81f01"],
Cell[16064, 440, 187, 3, 57, "Output",ExpressionUUID->"c87c1f84-7a5e-4878-819f-4ca69a15cebc"]
}, Open  ]],
Cell[16266, 446, 327, 10, 12, "Text",ExpressionUUID->"38765bcb-4b93-4c8c-8441-fe495f6127ac"],
Cell[16596, 458, 596, 14, 42, "Text",ExpressionUUID->"3784ffc5-419a-42f7-a29c-63c72b19a575"],
Cell[CellGroupData[{
Cell[17217, 476, 437, 13, 96, "Input",ExpressionUUID->"1065243b-56af-4278-9483-ee34e2109f60"],
Cell[17657, 491, 187, 3, 57, "Output",ExpressionUUID->"e0afcdba-b273-4bb6-b93a-8b8db7f562ec"]
}, Open  ]],
Cell[CellGroupData[{
Cell[17881, 499, 684, 18, 108, "Input",ExpressionUUID->"6e6af5d5-2cdb-4276-be3b-4cab9b878464"],
Cell[18568, 519, 228, 3, 57, "Output",ExpressionUUID->"02f77c73-3472-4d7f-980e-da9c26f53ff5"]
}, Open  ]],
Cell[18811, 525, 327, 10, 12, "Text",ExpressionUUID->"7cacb1be-f782-42de-8661-eb6da249ebed"],
Cell[19141, 537, 252, 4, 42, "Text",ExpressionUUID->"dc150b45-745b-4723-823e-3da777c0a9dd"],
Cell[CellGroupData[{
Cell[19418, 545, 4713, 144, 191, "Input",ExpressionUUID->"0ce2e3a1-c0bb-4cf7-9b67-ef5fa98988e7"],
Cell[24134, 691, 235, 4, 57, "Output",ExpressionUUID->"15308a00-589c-44c3-8633-7b4441f0bc0e"]
}, Open  ]],
Cell[CellGroupData[{
Cell[24406, 700, 785, 19, 99, "Input",ExpressionUUID->"3ff68af1-f38d-4703-8cbf-05664dfb5023"],
Cell[25194, 721, 235, 4, 57, "Output",ExpressionUUID->"1fda8807-1c22-4341-a4d2-76354bfd759c"]
}, Open  ]],
Cell[25444, 728, 327, 10, 12, "Text",ExpressionUUID->"fc35436c-2622-4181-8216-95cc6fefafe3"],
Cell[25774, 740, 9370, 339, 38, "Input",ExpressionUUID->"471e1fa5-b4f0-4e13-9a41-88acfb81ccf6"],
Cell[CellGroupData[{
Cell[35169, 1083, 392, 10, 77, "Input",ExpressionUUID->"33fc87b4-8cc1-4856-a524-b5ea65ec603c"],
Cell[35564, 1095, 187, 3, 57, "Output",ExpressionUUID->"1997f8e8-6406-4b57-958d-1dd6bb27871f"]
}, Open  ]],
Cell[CellGroupData[{
Cell[35788, 1103, 544, 15, 77, "Input",ExpressionUUID->"c62fc1a9-f2d9-4ac5-95d4-7f42ef1a3e39"],
Cell[36335, 1120, 188, 3, 57, "Output",ExpressionUUID->"2aec64d3-25f5-4027-a683-0b810014e375"]
}, Open  ]],
Cell[36538, 1126, 327, 10, 12, "Text",ExpressionUUID->"cf48eafe-97cc-4cfb-8df3-9c2d097a2376"],
Cell[36868, 1138, 277, 4, 41, "Text",ExpressionUUID->"4acb5987-1788-422d-8787-56f7fcaa65f8"],
Cell[CellGroupData[{
Cell[37170, 1146, 443, 12, 76, "Input",ExpressionUUID->"de623967-2245-46d4-81fa-851356294c59"],
Cell[37616, 1160, 187, 3, 57, "Output",ExpressionUUID->"433c4204-bc72-4f58-8a3b-e20c1809da0d"]
}, Open  ]],
Cell[CellGroupData[{
Cell[37840, 1168, 3456, 113, 99, "Input",ExpressionUUID->"56d411a5-07cf-410a-bbac-c30e9bfdabff"],
Cell[41299, 1283, 288, 6, 57, "Output",ExpressionUUID->"1c192996-45d8-40fa-b802-0f2af9538f9e"]
}, Open  ]]
}, Open  ]]
}
]
*)

