TRAPEOID.8xp

Contributed by: Colin Schroeder '06

Purpose: Estimates definite integrals using Trapezoidal Rule

Download TRAPEOID.8xp

Source Code

:Disp ""
:Disp "DONT FORGET"
:Disp "THE QUOTATIONS"
:Disp ""
:Lbl BG
:Disp "WHAT IS YOUR"
:Disp "FUNCTION?"
:Prompt Y1
:Disp "WHAT IS YOUR"
:Disp " INTERVAL?"
:Disp "FROM:"
:Prompt F
:Disp "TO:"
:Prompt L
:Disp "HOW MANY"
:Disp "TRAPEZOIDS?"
:Prompt T
:L-FD
:D/TH
:(H/2)(Y1(F)+Y1(L)+2sum(seq(Y1(A),A,F+H,L-H,H)C
:Disp C
:Pause
:Menu("AGAIN?","YES",BG,"NO",NO)
:Lbl