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)

par[list_]:=(((Plus@@((list^(-1)))))^(-1));
ser[list_]:=Plus@@list;
L1=1;
L2=0.1*(10^(-3));
L3=10 *(10^(-9));
c1=10*(10^(-6));
c2=1*(10^(-3));
c3=100*(10^(-12));
R1=1;
R2=R3=100;
R4=1000;
Z1=ser[{(1/(I*ω*c2)),par[{ser[{(1/(I*ω*c1)),R1}],ser[{I*ω*L1,R2}]}]}];
Z2=ser[{R3,par[{I*ω*L3,(1/(I*ω*c3)),ser[{R4,I*ω*L2}]}]}];
prenos=(Z2/(Z1+Z2));
LogLogPlot[Abs[prenos],{ω,(10^(-6)),(10^6)},PlotStyle->{Black,Thick},AxesLabel->{"ω [(s^(-1))]","prenos [-]"},GridLines->Automatic];
Print["Realna cast je ",Re[prenos/.ω->314]," Imaginarni cast je ",Im[prenos/.ω->314]]

Pomoci FindRoot[Cos[a*x]==x,{x,1}] vytvorte funkci, ktera pro zadane a vraci hodnotu x. (2b) 
Pomocí Table vytvorte list dvojic {(a^2),(Sqrt[f[a]])} pro a∈<0,2> s krokem 0.1 . (1b)
Pomoci ListPlot vysledek vytiskněte a popiste osy, body cervene a s nastavenou velikosti. (1b)

Vyrešte rovnici 6(x^3)+2(x^2)+x+1=0. (1b)
Pomoci Chop odstrante "skoro nuly" (1b)
Vypoctete hodnoty vyrazu 3*(x1+x2+x3) a 6*x1*x2*x3 a vysledky zobrazte pomoci Print (1b)

Pomoci funkce Rationalize najdete zlomek aproximujici odmocninu ze dvou s chybou mensi nez 0,01. (1b)
Vysledek zobrazte pomocí Print ve tvaru nahrada=vypoctena nahrada. (1b)
Spoctete chybu nahrady v procentech a vysledek zobrazte pomoci Print jako desetinne cislo. (1b)

Je dan list {3, 10, -5, 22, -21, 42, -45, 70}. Pomoci funkce FindSequenceFunction uhodnete dalsí clen posloupnosti. (1 b)