LSTMDPT.8xp

Purpose: Finds the midpoints of one list and stores them in another.

Download LSTMDPT.8xp

Screenshots

Source Code

:ClrHome
:Disp "THIS PROGRAM"
:Disp "FINDS MIDPTS OF"
:Disp "L1 ENTRIES AND"
:Disp "STORES THEM IN"
:Disp "L6."
:Disp ""
:Disp "[ENTER]"
:Pause
:ClrListL6
:dim(L1)N
:For(A,1,N-1)
:(L1(A)+L1(A+1))/2L6(A)
: