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