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