lprint(`Úloha 110:`);lprint(`Funkci f aproximujte jen s pomocí tabulky hodnot a čtyř základních`);lprint(`aritmetických operací (eventuálně umocňování s celočíselným`);lprint(`exponentem) tak, abyste dosáhli relativní chybu nejvýše epsilon na`);lprint(`intervalu nejméně (a,b), kde`);f := unapply(piecewise(t^2<1,1+exp(1-1/(1-t^2)),1),t);a := -5;b := 5;epsilon := 10^(-6);