"]]}},
AspectRatio->NCache[GoldenRatio^(-1), 0.6180339887498948],
Axes->True,
AxesOrigin->{0, 0},
PlotRange->{{-3.9999998775510206`, 1.9999998775510204`}, {
8, 14.999999265306137`}},
PlotRangeClipping->True,
PlotRangePadding->{
Scaled[0.02], {Automatic,
Scaled[0.02]}}]], "Output",
CellChangeTimes->{{3.7778235399989977`*^9, 3.7778235834305115`*^9}, {
3.777823992981277*^9, 3.777824031780964*^9}}]
}, Open ]],

Cell[CellGroupData[{

Cell[BoxData[{
RowBox[{
RowBox[{"f", "[", "x_", "]"}], ":=",
RowBox[{
RowBox[{"x", " ",
RowBox[{"Sin", "[", "x", "]"}]}], "+",
RowBox[{"Cos", "[", "x", "]"}]}]}], "\[IndentingNewLine]",
RowBox[{
RowBox[{
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"f", "[", "x", "]"}], ",",
RowBox[{"{",
RowBox[{"x", ",", "0", ",",
RowBox[{"6", "Pi"}]}], "}"}]}], "]"}], ";"}], "\[IndentingNewLine]",
RowBox[{"(*", " ",
RowBox[{
RowBox[{"Sem", " ", "Eixos", " ", "\[IndentingNewLine]", "Axes"}],
"\[Rule]",
RowBox[{
RowBox[{"False", "\[IndentingNewLine]", "Axes"}], "\[Rule]",
RowBox[{"{",
RowBox[{"True", ",", "False"}], "}"}]}]}], " ", "*)"}],
"\[IndentingNewLine]", "\[IndentingNewLine]",
RowBox[{"(*",
RowBox[{
RowBox[{
"Label", " ", "dos", " ", "eixos", "\[IndentingNewLine]", "AxesLabel"}],
"\[Rule]",
RowBox[{"{",
RowBox[{"\"\<Tempo\>\"", ",", "\"\<V\>\""}], "}"}]}], "*)"}],
"\[IndentingNewLine]",
RowBox[{"(*", " ",
RowBox[{
RowBox[{
"Label", " ", "do", " ", "gr\[AAcute]fico", " ", "\[IndentingNewLine]",
"PlotLabel"}], " ", "\[Rule]", " ", "\"\<Gr\[AAcute]fico\>\""}], " ",
"*)"}], "\[IndentingNewLine]",
RowBox[{"(*", " ",
RowBox[{
RowBox[{
"Estilo", " ", "do", " ", "plot", "\[IndentingNewLine]", "PlotStyle"}],
" ", "\[Rule]", " ", "Red"}], " ", "*)"}], "\[IndentingNewLine]",
RowBox[{"(*", " ",
RowBox[{
RowBox[{
"Estilo", " ", "do", " ", "plot", "\[IndentingNewLine]", "PlotStyle"}],
" ", "\[Rule]", " ", "Red"}], " ", "*)"}], "\[IndentingNewLine]",
RowBox[{"(*", " ",
RowBox[{
RowBox[{
"Estilo", " ", "do", " ", "eixo", "\[IndentingNewLine]", "PlotStyle"}],
" ", "\[Rule]", " ", "Red"}], " ", "*)"}], "\[IndentingNewLine]",
RowBox[{"(*", " ",
RowBox[{
"Parametros", " ", "do", " ", "PlotStyle", "\[IndentingNewLine]",
"RGBColor", "\[IndentingNewLine]", "Thick", "\[IndentingNewLine]",
RowBox[{"Thickness", "[", "tamanho", "]"}], "\[IndentingNewLine]",
"Dashed", "\[IndentingNewLine]",
RowBox[{"Dashing", "[",
RowBox[{"{",
RowBox[{
RowBox[{"tamanho", " ", "linha"}], ",",
RowBox[{"tamanho", " ", "lacuna"}]}], "}"}], "]"}]}],
"\[IndentingNewLine]", "*)"}], "\[IndentingNewLine]",
"\[IndentingNewLine]", "\[IndentingNewLine]"}], "\[IndentingNewLine]",
RowBox[{"Plot", "[",
RowBox[{
RowBox[{"f", "[", "x", "]"}], ",",
RowBox[{"{",
RowBox[{"x", ",", "0", ",",
RowBox[{"6", "Pi"}]}], "}"}], ",",
RowBox[{"Ticks", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"{",
RowBox[{"0", ",", "Pi", ",",
RowBox[{"2", "Pi"}], ",",
RowBox[{"3", "Pi"}], ",",
RowBox[{"4", "Pi"}], ",",
RowBox[{"5", "Pi"}], ",",
RowBox[{"6", "Pi"}], ",",
RowBox[{"Pi", "/", "2"}]}], "}"}], ",", "Automatic"}], "}"}]}], ",",
RowBox[{
"PlotLabel", " ", "\[Rule]", " ", "\"\<Gr\[AAcute]fico de f(x)\>\""}], ",",
" ",
RowBox[{"AxesStyle", " ", "\[Rule]", " ",
RowBox[{"RGBColor", "[",
RowBox[{".5", ",", ".9", ",", ".8"}], "]"}]}], ",",
RowBox[{"PlotStyle", "\[Rule]",
RowBox[{"{",
RowBox[{
RowBox[{"RGBColor", "[",
RowBox[{"1", ",", ".5", ",", "1"}], "]"}], ",",
RowBox[{"Thickness", "[", ".005", "]"}], ",",
RowBox[{"Dashing", "[",
RowBox[{"{",
RowBox[{"0.01", ",", "0.015"}], "}"}], "]"}]}], "}"}]}]}],
"]"}], "\[IndentingNewLine]"}], "Input",
CellChangeTimes->{{3.7778240593786106`*^9, 3.7778242247917724`*^9}, {
3.7778243657740517`*^9, 3.77782463793863*^9}, {3.7778248386057005`*^9,
3.777824897231628*^9}, {3.777824941739284*^9, 3.7778250088985753`*^9}, {
3.777825063671229*^9, 3.7778250652780595`*^9}, {3.777825305195073*^9,
3.777825338532914*^9}, {3.777825373243582*^9, 3.7778255188411818`*^9}, {
3.7778255861252756`*^9, 3.7778257908170547`*^9}, {3.7778260104053526`*^9,
3.777826066382817*^9}, {3.7778260967269735`*^9, 3.777826119535197*^9}, {
3.777826156540057*^9, 3.7778261837164764`*^9}},
FontWeight->"Plain"],

Cell[BoxData[
GraphicsBox[{{}, {},
{RGBColor[1, 0.5, 1], Thickness[0.005], Dashing[{0.01, 0.015}],
LineBox[CompressedData["
1:eJwVV3k81F8XljXZx76OZWYsM5iZEIV7KESLJdEipKRUElJE9bNVkhSJUpIi
JJIikZsQsqQkIkkiJVuWsb/f96/5PHPvPfc5z3Puufer5nXMyZubi4srjYeL
6/+/0Srizz69TzXfsoIAXGOoS6/lkcvjk4i7ZWOMBIFfVmsIaTw+j7oPn5G1
JjDv7KjH5aqr6NMRm6LbBM4T27pW8PENlK2531luxRhyoj2Sik69jebLHs89
I3CYSvTJc1UZ6K+8YkYw9xh6r12837z0PnqvUGK5i2cMaRj+cFzIz0ZmF3M7
PXnHUDCQUFlmLvJZt8Yjlm8MNWyyYJxKzUcvdV68a+cfQ/H0UuFbNoWo+kqW
jPXKMWT8xJ4ntOoJ2r0iwahDcAz1GQ3O7jB7ikg3VNUuC42huPIzY2tKi9GU
qMq7/SJj6Nvb/K9T+SVosX2BHiYxhi5ssWpr03qBvuwfe/tScgyxP3Y3PM0s
QzlFJ/4qy4yhmB6h0uOpFchm+vx1W8UxpL8/87GDVCXa38MzTVIZQ8NBtz/c
sMHo9ODorSXVMZQ8Z1AfXPUarYjS8zXVHEOHK85tGDhbhVZGOx+K1xlDcK6x
crvZG/RA7tpubr0x9Jtv/3OD0mq0lI0q7A3HkJlEYuZE/lvE3htWGW41hkht
PSpeh+vQv9yc7G7bMTSQrHOzVasesUUGn7ptHUMJSlUJhZkNyIZxGFe6jqF+
zfFwv9QmdHvdN33RI2PoxW/T2a8uzSjh8ER1wHFCv/wLQVukWlCsmPnJmeAx
lCafYJhs8x7dmypK94wYQ1bpmowTVa3o2f5nNfk3x1DhuaYhhtoHpHRutbhY
xhhS8ArM7j/7AfFeZa+9kj2GRiiV6s5mH9E3k4bwP8VjKCXXRX51aRsSmlvX
KNpK6PMsmn88/zM6K5En0y46jrapDu66K9WBzphsOvVadhyVxW4ssD/dgbKi
7wY3qY6jCx5COx5v7ESrX7lrWq8eR1TBqzmHf3xBWd7fdIt2jiN3t7TNA3I9
SDb2zqj+o3F08L+d9X8t+tAp+eGK/d4TKM0oNtDqRB/adVt785vjE6jlT5ny
7Yd9aOXLtMNrzkwgIxelgM1iP1Dxzs0v3W9MIF76N4W87h9IcPjxzO2GCXS3
bf+Rgyd/otYp0qczBv9Qp6a/2I9Hv9B6cj7rDmkSyZmHlnzs/oW2B9QW9JEn
0Q7nKI9q4SEktZduoqs7idrPpRQ8ODKEnkd4vf1gM4k+dGL7g4zfyHLnTy3n