lprint(`Uloha 309:`);lprint(`Urcete vsechny koreny funkce`);
f := x -> 6.*exp(-0.1e-1*x)-5.*exp(-x)- 0.1e-4/(x+1);
lprint(`s chybou nejvyse`);
epsilon := 1e-10;
lprint(`Zduvodnete dosazenou presnost.`);