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

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

(* CreatedBy='Mathematica 10.1' *)

(*CacheID: 234*)
(* Internal cache information:
NotebookFileLineBreakTest
NotebookFileLineBreakTest
NotebookDataPosition[       158,          7]
NotebookDataLength[      6208,        157]
NotebookOptionsPosition[      5556,        129]
NotebookOutlinePosition[      5927,        145]
CellTagsIndexPosition[      5884,        142]
WindowFrame->Normal*)

(* Beginning of Notebook Content *)
Notebook[{

Cell[CellGroupData[{
Cell[TextData[{
 StyleBox["\:0423\:043f\:0440\:0430\:0436\:043d\:0435\:043d\:0438\:0435",
  FontFamily->"Times New Roman"],
 " 9.\n\:041c\:0435\:0442\:043e\:0434 \:043d\:0430 \:043d\:0430\:0439-\:043c\
\:0430\:043b\:043a\:0438\:0442\:0435 \:043a\:0432\:0430\:0434\:0440\:0430\
\:0442\:0438"
}], "Title",
 CellChangeTimes->{{3.688790915723016*^9, 3.6887909857831135`*^9}, {
  3.7530784924711685`*^9, 3.7530785159582176`*^9}}],

Cell[CellGroupData[{

Cell["\<\
\:0412 \:0442\:0430\:0431\:043b\:0438\:0446\:0430\:0442\:0430 \:0441\:0430 \
\:0434\:0430\:0434\:0435\:043d\:0438 \:0434\:0430\:043d\:043d\:0438 \:0437\
\:0430 \:0442\:043e\:0432\:0430 \:043a\:0430\:043a \:043d\:0438\:0432\:043e\
\:0442\:043e \:043d\:0430 \:0432\:044a\:0433\:043b\:0435\:0440\:043e\:0434\
\:043d\:0438\:044f \:0434\:0438\:043e\:043a\:0441\:0438\:0434 \:0432 \:0430\
\:0442\:043c\:043e\:0441\:0444\:0435\:0440\:0430\:0442\:0430 \:0441\:0435 \
\:0435 \:0438\:0437\:043c\:0435\:043d\:044f\:043b\:043e \:0432 \:043f\:0435\
\:0440\:0438\:043e\:0434\:0430 1980-2000\
\>", "Subsection",
 CellChangeTimes->{{3.7525562816356525`*^9, 3.7525563282427197`*^9}, {
   3.752556364559772*^9, 3.75255646639592*^9}, {3.753078539922268*^9, 
   3.7530785602103214`*^9}, 3.7530786124044313`*^9, {3.7530786490225105`*^9, 
   3.7530786961396117`*^9}}],

Cell[BoxData[
 TagBox[GridBox[{
    {"\<\"\:0433\:043e\:0434\:0438\:043d\:0430\"\>", "1980", "1982", "1984", 
     "1986", "1988", "1990", "1992", "1994", "1996", "1998", "2000"},
    {"\<\"\\!\\(\\*SubscriptBox[\\(CO\\), \\(2\\)]\\)\"\>", "338.7`", 
     "341.1`", "344.4`", "347.2`", "351.5`", "354.2`", "356.4`", "358.9`", 
     "362.6`", "366.6`", "369.4`"}
   },
   AutoDelete->False,
   GridBoxFrame->{"Columns" -> {{True}}, "Rows" -> {{True}}},
   GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
  "Grid"]], "Output",
 CellChangeTimes->{{3.7530790438393764`*^9, 3.753079081142453*^9}, {
  3.7530791453675957`*^9, 3.753079197810711*^9}}]
}, Open  ]],

Cell[CellGroupData[{

Cell["\<\
\:0422\:043e\:043f\:043a\:0430 \:0435 \:043f\:0443\:0441\:043d\:0430\:0442\
\:0430 \:043e\:0442 \:0432\:0438\:0441\:043e\:0447\:0438\:043d\:0430 450m. \
\:041d\:0435\:0439\:043d\:0430\:0442\:0430 \:0432\:0438\:0441\:043e\:0447\
\:0438\:043d\:0430 \:0435 \:0438\:0437\:043c\:0435\:0440\:0432\:0430\:043d\
\:0430 \:043f\:0440\:0435\:0437 \:0438\:043d\:0442\:0435\:0440\:0432\:0430\
\:043b\:0438 \:043e\:0442 1 \:0441\:0435\:043a. \:0438 \:0440\:0435\:0437\
\:0443\:043b\:0442\:0430\:0442\:0438\:0442\:0435 \:0441\:0430 \:043f\:043e\
\:043c\:0435\:0441\:0442\:0435\:043d\:0438 \:0432 \:0442\:0430\:0431\:043b\
\:0438\:0446\:0430\:0442\:0430\
\>", "Subsection",
 CellChangeTimes->{{3.7525562816356525`*^9, 3.7525563282427197`*^9}, {
   3.752556364559772*^9, 3.75255646639592*^9}, {3.753078539922268*^9, 
   3.7530785602103214`*^9}, 3.7530786124044313`*^9, {3.7530787075336356`*^9, 
   3.753078781536801*^9}, 3.7530788721270075`*^9}],

Cell[BoxData[
 TagBox[GridBox[{
    {"\<\"t, sec\"\>", "0", "1", "2", "3", "4", "5", "6", "7", "8", "9"},
    {"\<\"h, m\"\>", "450", "445", "431", "408", "375", "332", "279", "216", 
     "143", "61"}
   },
   AutoDelete->False,
   GridBoxFrame->{"Columns" -> {{True}}, "Rows" -> {{True}}},
   GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
  "Grid"]], "Output",
 CellChangeTimes->{3.753079236066798*^9, 3.7530793144309587`*^9}]
}, Open  ]],

Cell[CellGroupData[{

Cell["\<\
\:0421\:043b\:0435\:0434\:043d\:0430\:0442\:0430 \:0442\:0430\:0431\:043b\
\:0438\:0446\:0430 \:0441\:044a\:0434\:044a\:0440\:0436\:0430 \:0434\:0430\
\:043d\:043d\:0438 \:0437\:0430 \:0442\:043e\:0432\:0430 \:043a\:0430\:043a \
\:0441\:0435 \:0438\:0437\:043c\:0435\:043d\:044f \:0431\:0440\:043e\:044f \
\:043d\:0430 \:0442\:0440\:0430\:043d\:0437\:0438\:0441\:0442\:043e\:0440\
\:0438\:0442\:0435 \:0432 \:0435\:0434\:0438\:043d \:043f\:0440\:043e\:0446\
\:0435\:0441\:043e\:0440 \:0432 \:0445\:0438\:043b\:044f\:0434\:0438 \:0432 \
\:0437\:0430\:0432\:0438\:0441\:0438\:043c\:043e\:0441\:0442 \:043e\:0442 \
\:0433\:043e\:0434\:0438\:043d\:0430\:0442\:0430:\
\>", "Subsection",
 CellChangeTimes->{{3.7525562816356525`*^9, 3.7525563282427197`*^9}, {
   3.752556364559772*^9, 3.75255646639592*^9}, {3.753078539922268*^9, 
   3.7530785602103214`*^9}, 3.7530786124044313`*^9, {3.753078791810833*^9, 
   3.7530788698200026`*^9}}],

Cell[BoxData[
 TagBox[GridBox[{
    {"\<\"\:0433\:043e\:0434\:0438\:043d\:0430\"\>", "1971", "1972", "1974", 
     "1978", "1982", "1985", "1989", "1993", "1997", "1999", "2000"},
    {"\<\"\:0431\:0440.(x1000)\"\>", "2.25`", "2.5`", "5", "29", "120", "275",
      "1180", "3100", "7500", "24000", "42000"}
   },
   AutoDelete->False,
   GridBoxFrame->{"Columns" -> {{True}}, "Rows" -> {{True}}},
   GridBoxItemSize->{"Columns" -> {{Automatic}}, "Rows" -> {{Automatic}}}],
  "Grid"]], "Output",
 CellChangeTimes->{{3.7530794674102883`*^9, 3.753079525777424*^9}}]
}, Open  ]]
}, Open  ]]
},
WindowSize->{1904, 945},
WindowMargins->{{0, Automatic}, {Automatic, 0}},
Magnification:>2. Inherited,
FrontEndVersion->"8.0 for Microsoft Windows (64-bit) (October 6, 2011)",
StyleDefinitions->"Default.nb"
]
(* End of Notebook Content *)

(* Internal cache information *)
(*CellTagsOutline
CellTagsIndex->{}
*)
(*CellTagsIndex
CellTagsIndex->{}
*)
(*NotebookFileOutline
Notebook[{
Cell[CellGroupData[{
Cell[580, 22, 424, 8, 270, "Title"],
Cell[CellGroupData[{
Cell[1029, 34, 855, 13, 108, "Subsection"],
Cell[1887, 49, 668, 13, 100, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[2592, 67, 938, 14, 108, "Subsection"],
Cell[3533, 83, 455, 10, 100, "Output"]
}, Open  ]],
Cell[CellGroupData[{
Cell[4025, 98, 938, 14, 108, "Subsection"],
Cell[4966, 114, 562, 11, 101, "Output"]
}, Open  ]]
}, Open  ]]
}
]
*)

(* End of internal cache information *)