Given the pseudocode formulas for the question below please derive Mathematica code to solve the problem?

program Trapezoid integeri real h,sum, x integer n60; real a0, b-1 sumIf (a) +f(b)) fori 1 to n1 umsum +f(x) Trapezoid Pseudocode end for sum(sum)h output sum end Trapezoid real function f(x) real x end function f