Just make a similar code

FIGURE 5.10 Pseudocode for function to implement bisection FUNCTION Bisect(x1. xu, es, imax, xr. iter, ea) iter = 0 DO XT= (x1 + xu) / 2 iter= iter + 1 IF xr 0 THEN ea = ABS((xr-xrold) / xr) * 100 END IF test = f(x1) * f(xr) IF test 0 THEN ELSE END IF imax EXIT IF ea 0 THEN ELSE END IF imax EXIT IF ea