Pokyny: 
*Řešení u příkladů v Mathematice je řešení v Mathematice, na ručně připsané výsledky nebude brán zřetel.
*Před odevzdáním pomocí Cell->Delete All Output smažte výsledky a tak soubor uložte
* Cvičící s vypnutým Kernelem odevzdaný notebook spustí a zkontroluje výstupy. Doporučujeme vyzkoušet si spuštění s vypnutým jádrem před odevzdáním testu.
* Na cvičícím zadaný mail zašlete výsledek ve pojmenovaný test1JmenoPrijmeni.nb
* U úloh "na papíře" se klidně rozepište, proč to, či ono, podepište se.

Pro impedanční  dělič podle zadaného schématu vytvořte graf abs. hodnoty přenosu v logaritmických souřadnicích, s GridLines, popisem os se správnými jednotkami, černě a tlustě. (3b). 

Pro ω = 314 (s^(-1)) vypište pomocí Print reálnou a imaginární část impedance (jako desetinná čísla) z pohledu vstupních svorek zadaného schématu (1b)

V seriovem rezonancnim obvodu plati rovnice ((ω*L)/r)==Q,(ω^2)==(1/(L*c)), obecne plati T==2(Pi/ω).
Kdybychom zavedli casove konstanty tak, "jako by kond nebo civka nebyly", tedy τ1==(L/r),τ2==r*c, kolik vyjde {((τ1)/T),((τ2)/T)}?
Vysledek zobrazte pomoci Print. Napoveda: Solve, /.
Dalsi napoveda: slova kolem obvodu jsou jen mlzeni, k reseni nic z toho nepotrebujete:-]
Pouceni: pokud vas obvody zajimaji, je vysledek zajimavy a poucny:-]
(3b)

Pomocí FindRoot[Cos[(Sqrt[R1])*x]==x,{x,1}] vytvořte funkci, která pro zadané R1 vrací hodnotu x. (2b) 
Pomocí Table vytvořte list dvojic {(R1^0.56),Sin[(Sqrt[f[R1]])]} pro R1∈<0,2> s krokem 0.1 . (1b)
Pomocí ListPlot výsledek vytiskněte a popište osy, body červené a s nastavenou velikostí. (1b)

Vyřešte rovnici 6(x^3)+2(x^2)+x+1=0. (1b)
Vypočtěte hodnoty výrazů 2*(x1+3*x2+5*x3) a 6*x1*x2*x3 
 a výsledky zobrazte pomocí Print (1b)

Pomocí funkce Rationalize najděte zlomek aproximující odmocninu ze sedmi s chybou menší než 0,01. (1b)
Spočtěte chybu náhrady v procentech a výsledek zobrazte pomocí Print jako desetinné číslo. (1b)