Program for rectangular approximation of area, Continued) – Sharp EL-9900 User Manual
Page 89

14
Advanced Keyboard/CALCULUS USING THE SHARP EL-9900
Copyright © 2002, Sharp Electronics Corporation. Permission is granted to photocopy for educational use only.
Y1(X)+R
⇒R
2ndF VARS ENTER 1 (
X/
θ/T/n ) + ALPHA R STO
ALPHA R ENTER
X+W÷2
⇒X
X/
θ/T/n + ALPHA W ÷ 2 STO X/θ/T/n ENTER
Y1(X)+M
⇒M
2ndF VARS ENTER 1 (
X/
θ/T/n ) + ALPHA M STO
ALPHA M ENTER
X+W÷2
⇒X
X/
θ/T/n + ALPHA W ÷ 2 STO X/θ/T/n ENTER
If X<BGoto
PRGM B 0 3 X/
θ/T/n MATH F 5 ALPHA
LOOP
B PRGM B 0 2 2ndF A-LOCK L O O P
ALPHA ENTER
ClrT
PRGM C 1 ENTER
Print "LEFT=
PRGM A 1 PRGM 2 2ndF A-LOCK L E F T =
ALPHA ENTER
Print W
×L
PRGM 1 ALPHA W
× ALPHA L ENTER
Print "MID=
PRGM 1 PRGM 2 2ndF A-LOCK M I D
= ALPHA ENTER
Print W
×M
PRGM 1 ALPHA W
× ALPHA M ENTER
Print "RIGHT=
PRGM 1 PRGM 2 2ndF A-LOCK R I G H T
= ALPHA ENTER
Print W
× R
PRGM 1 ALPHA W
× ALPHA R ENTER
End
PRGM 6 ENTER
Press 2ndF QUIT to save the program and exit the editing mode.
PROGRAM FOR RECTANGULAR
APPROXIMATION OF AREA
(continued)