(* Content-type: application/mathematica *)

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

(* CreatedBy='Mathematica 6.0' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       145,          7]
NotebookDataLength[      5544,        211]
NotebookOptionsPosition[      4416,        168]
NotebookOutlinePosition[      4923,        186]
CellTagsIndexPosition[      4880,        183]
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{
Cell[BoxData[
 RowBox[{"(*", "\:6781\:9650", "*)"}]], "Input",
 CellChangeTimes->{{3.4046896923125*^9, 3.404689696140625*^9}},
 FontColor->GrayLevel[0],
 Background->GrayLevel[1]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Limit", "[", 
  RowBox[{
   FractionBox[
    RowBox[{
     RowBox[{"x", "^", "5"}], "-", "32"}], 
    RowBox[{
     RowBox[{"x", "^", "3"}], "-", "8"}]], ",", 
   RowBox[{"x", "->", "2"}]}], "]"}]], "Input",
 FontColor->GrayLevel[0],
 Background->GrayLevel[1]],

Cell[BoxData[
 FractionBox["20", "3"]], "Output",
 CellChangeTimes->{3.404689701734375*^9, 3.40511983809375*^9, 
  3.43674056846875*^9, 3.6574509679178534`*^9},
 FontColor->GrayLevel[0],
 Background->GrayLevel[1]]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Limit", "[", 
  RowBox[{
   RowBox[{"1", "/", "x"}], ",", 
   RowBox[{"x", "\[Rule]", "0"}], ",", 
   RowBox[{"Direction", "\[Rule]", "1"}]}], "]"}]], "Input",
 FontColor->GrayLevel[0],
 Background->GrayLevel[1],
 CellID->52153848],

Cell[BoxData[
 RowBox[{"-", "\[Infinity]"}]], "Output",
 CellChangeTimes->{3.404689909625*^9, 3.40511984353125*^9, 
  3.436740582421875*^9, 3.657450969852257*^9},
 ImageSize->{20., -0.0625},
 ImageMargins->{{0, 0}, {0, 0}},
 ImageRegion->{{0, 1}, {0, 1}},
 FontColor->GrayLevel[0],
 Background->GrayLevel[1]]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Limit", "[", 
  RowBox[{
   RowBox[{"1", "/", "x"}], ",", 
   RowBox[{"x", "\[Rule]", "0"}], ",", 
   RowBox[{"Direction", "\[Rule]", 
    RowBox[{"-", "1"}]}]}], "]"}]], "Input",
 FontColor->GrayLevel[0],
 Background->GrayLevel[1],
 CellID->58998040],

Cell[BoxData["\[Infinity]"], "Output",
 CellChangeTimes->{3.4046899118125*^9, 3.40511984559375*^9, 
  3.4367405880625*^9, 3.6574509720206604`*^9},
 ImageSize->{12., -0.0625},
 ImageMargins->{{0, 0}, {0, 0}},
 ImageRegion->{{0, 1}, {0, 1}},
 FontColor->GrayLevel[0],
 Background->GrayLevel[1]]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Limit", "[", 
  RowBox[{
   SuperscriptBox[
    RowBox[{"(", 
     RowBox[{
      SuperscriptBox["\[ExponentialE]", "x"], "+", "x"}], ")"}], 
    FractionBox["1", "x"]], ",", 
   RowBox[{"x", "\[Rule]", "\[Infinity]"}]}], "]"}]], "Input",
 FontColor->GrayLevel[0],
 Background->GrayLevel[1]],

Cell[BoxData["\[ExponentialE]"], "Output",
 CellChangeTimes->{3.404689961015625*^9, 3.405119848453125*^9, 
  3.436740592453125*^9, 3.6574509740174637`*^9},
 FontColor->GrayLevel[0],
 Background->GrayLevel[1]]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Limit", "[", 
  RowBox[{
   SuperscriptBox[
    RowBox[{"(", 
     RowBox[{
      SuperscriptBox["\[ExponentialE]", "x"], "+", "x"}], ")"}], 
    FractionBox["1", "x"]], ",", 
   RowBox[{"x", "\[Rule]", 
    RowBox[{"-", "Infinity"}]}]}], "]"}]], "Input",
 CellChangeTimes->{{3.4046899716875*^9, 3.40468997465625*^9}},
 FontColor->GrayLevel[0],
 Background->GrayLevel[1]],

Cell[BoxData["1"], "Output",
 CellChangeTimes->{3.404689976515625*^9, 3.405119852375*^9, 
  3.436740595578125*^9, 3.6574509765602684`*^9},
 FontColor->GrayLevel[0],
 Background->GrayLevel[1]]
}, Open  ]],

Cell[CellGroupData[{

Cell[BoxData[
 RowBox[{"Limit", "[", 
  RowBox[{
   RowBox[{
    RowBox[{
     RowBox[{"(", 
      RowBox[{"x", " ", "y"}], ")"}], "/", 
     RowBox[{"(", 
      RowBox[{
       RowBox[{"x", "^", "2"}], "+", 
       RowBox[{"y", "^", "2"}]}], ")"}]}], "/.", 
    RowBox[{"x", "\[Rule]", 
     RowBox[{"t", " ", "y"}]}]}], ",", 
   RowBox[{"y", "\[Rule]", "0"}]}], "]"}]], "Input",
 FontColor->GrayLevel[0],
 Background->GrayLevel[1],
 CellID->33925419],

Cell[BoxData[
 FractionBox["t", 
  RowBox[{"1", "+", 
   SuperscriptBox["t", "2"]}]]], "Output",
 CellChangeTimes->{3.404690143546875*^9, 3.405119865046875*^9, 
  3.436740603578125*^9, 3.657450978463472*^9},
 FontColor->GrayLevel[0],
 Background->GrayLevel[1]]
}, Open  ]]
},
WindowSize->{1272, 903},
WindowMargins->{{0, Automatic}, {Automatic, 0}},
PrivateNotebookOptions->{"VersionedStylesheet"->{"Default.nb"[8.] -> False}},
TaggingRules->{"SearchTextTranslated" -> "", "SearchText" -> ""},
Magnification->1.5,
FrontEndVersion->"10.3 for Microsoft Windows (64-bit) (October 9, 2015)",
StyleDefinitions->"Default.nb"
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[545, 20, 179, 4, 45, "Input"],
Cell[CellGroupData[{
Cell[749, 28, 284, 10, 65, "Input"],
Cell[1036, 40, 213, 5, 65, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1286, 50, 255, 8, 45, "Input",
 CellID->52153848],
Cell[1544, 60, 308, 8, 44, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[1889, 73, 275, 9, 45, "Input",
 CellID->58998040],
Cell[2167, 84, 292, 7, 44, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2496, 96, 315, 10, 62, "Input"],
Cell[2814, 108, 208, 4, 44, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[3059, 117, 395, 12, 62, "Input"],
Cell[3457, 131, 191, 4, 44, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[3685, 140, 452, 16, 45, "Input",
 CellID->33925419],
Cell[4140, 158, 260, 7, 98, "Output"]
}, Open  ]]
}
]
*)

(* End of internal cache information *)
