Pokyny: 
*Resení u prikladu v Mathematice je reseni v Mathematice, na rucně pripsane vysledky nebude bran zretel.
*Pred odevzdanim pomocí Cell->Delete All Output smazte vysledky a tak soubor ulozte
* Cvicici s vypnutym Kernelem odevzdany notebook spusti a zkontroluje vystupy. Doporucujeme vyzkouset si spusteni s vypnutym jadrem pred odevzdanim testu.
* Na cvicicim zadany mail zaslete vysledek  pojmenovany test1JmenoPrijmeni.nb
* U uloh "na papire" se klidne rozepiste, proc to, ci ono, podepiste se.

Pro impedancni  delic podle zadaneho schematu vytvorte graf abs. hodnoty prenosu v logaritmickych souradnicich, s GridLines, popisem os se spravnymi jednotkami, cerne a tluste. (3b). 

Pro ω = 314 (s^(-1)) vypiste pomocí Print realnou a imaginarní cast impedance (jako desetinna cisla) z pohledu vstupnich svorek zadaneho schematu (1b)

Pomoci FindRoot[Sin[b*Cos[a*x]]==0.5,{x,0.1}] vytvorte funkci, ktera pro zadane a a b vraci hodnotu x. (2b) 
Vytisknete graf funkce f(a,3) pro a∈{2,5},popiste osy, pojmenujte graf a cara tluste a zelene (1b)
Pomoci Manipulate mente zmineny graf pro b∈{3,3.9}, u Plotu zvolte vhodny PlotRange (ne All!) (2b)

Pomoci DSolve vyrešte rovnici y'[t]+3*y[t]==1 s pocatecni podminkou y[0]==1 a hodnotu ulozte do promenne. (2b)
Pomoci Plot vytisknete reseni pro t∈{3,6}, Popiste graf a osy, krivka cervene a tluste (1b)

Pomoci Expand roznasobte soucin polynomu(1b)

Pomoci ParametricPlot3D[{{4+(3+Cos[v]) Sin[u],4+(3+Cos[v]) Cos[u],4+Sin[v]},{8+(3+Cos[v]) Cos[u],3+Sin[v],4+(3+Cos[v]) Sin[u]}},{u,0,2Pi},{v,0,2Pi}] vytvorte 3D graf a pomoci PlotStyle udelejte jednu pneumatiku (Anuloid) zelene a druhou cervene (2b)