tt=Text["Моят първи примитив с Epilog",{0,700}];
tochka={PointSize[0.03],Green,Point[{-21,1000}]};

Plot[x^2 -354Sin[x],{x,-30,30},Epilog->{tt,tochka}]

Export["C:\\Users\\fmi\\Documents\\Veselina Slavcheva\\Упражнение 7 (13.11.15)\\1.jpg",%11,"JPEG"]

text={Orange,Text[Style["Моята графика",Bold,15],{8,14}]};
point={PointSize[0.02],Red,Point[{8,10}]};

Manipulate[Plot[2Sin[x]+x,{x,0,15},Epilog->{{Orange,Text[Style["Моята графика",Bold,v 2],{8,v 1}]},{PointSize[h 0.01],Red,Point[{h 1,2Sin[h]+h}]}}],{v,1,14},{h,1,15}]

DynamicModule[{h=6.48`,v=14.`},Plot[2 Sin[x]+x,{x,0,15},Epilog->{{Orange,Text[Style["Моята графика",Bold,v 2],{8,v 1}]},{PointSize[h 0.01`],Red,Point[{h 1,2 Sin[h]+h}]}}]]

Export["C:\\Users\\fmi\\Documents\\Veselina Slavcheva\\Упражнение 7 (13.11.15)\\2.jpg",%138,"JPEG"]