02-03-2019, 10:34 AM
ALG mode program for Secant Method Solution to f(x)=0
This program is very small and easy to use.
User need to give a very close pair of educated guess nearest to the root.
Remark:
This program don't have the tolerance setup but used the
iteration counter instead. The default counter is 65
Counter can be change on line 002 using two steps 50, 75, 90, etc.
-------------------------------------------------------
Procedure:
Start f(x) at line 022 and end GTO 008
1. First Guess [R/S] ... display # of iteration counter
2. Second Guess ... display Answer
---------------------------------------------------------
Example: FIX 4
x^3 + x^2 + x - 2 = 0
Insert Equation at line 022
[RCL] 1 [Y^X] 3 [+] [RCL] 1 [X^2] [+] [RCL] 1 [-] 2 [=] [GTO] 008
First guess 3 [R/S] display 65
Second guess 1 [R/S] display...........0.8105
Root = 0.8105
------------------------------------------------------
LN(x) + 3(x) - 10.8074
Insert Equation at line 022
[RCL] 1 [LN] + ([RCL]1 [x] 3) [-] 10.8074 [=] [GTO] 008
First guess 4 [R/S] display 65
Second guess 2 [R/S] display...........3.2134
-------------------------------------------------------
Program: ALG Mode
Remark:
This is not a perfect program, use at your own risk.
Any improvement is welcome for ALG programming mode only.
Gamo
This program is very small and easy to use.
User need to give a very close pair of educated guess nearest to the root.
Remark:
This program don't have the tolerance setup but used the
iteration counter instead. The default counter is 65
Counter can be change on line 002 using two steps 50, 75, 90, etc.
-------------------------------------------------------
Procedure:
Start f(x) at line 022 and end GTO 008
1. First Guess [R/S] ... display # of iteration counter
2. Second Guess ... display Answer
---------------------------------------------------------
Example: FIX 4
x^3 + x^2 + x - 2 = 0
Insert Equation at line 022
[RCL] 1 [Y^X] 3 [+] [RCL] 1 [X^2] [+] [RCL] 1 [-] 2 [=] [GTO] 008
First guess 3 [R/S] display 65
Second guess 1 [R/S] display...........0.8105
Root = 0.8105
------------------------------------------------------
LN(x) + 3(x) - 10.8074
Insert Equation at line 022
[RCL] 1 [LN] + ([RCL]1 [x] 3) [-] 10.8074 [=] [GTO] 008
First guess 4 [R/S] display 65
Second guess 2 [R/S] display...........3.2134
-------------------------------------------------------
Program: ALG Mode
Quote:[STO] 0 65 [STO] 2 [R/S] [STO] 1
[GTO] 023
[÷][ RCL] 0 [CHS] [+] [RCL] 1 [=] [STO] 1
1 [STO]-2 [RCL] 2
[X=0]
[GTO] 021
[GTO] 023
[RCL] 1
[GTO] 000
. // Start Equation at line 022
.
.
. // Use [RCL] 1 for the unknown Xs
.
[GTO] 008
Remark:
This is not a perfect program, use at your own risk.
Any improvement is welcome for ALG programming mode only.
Gamo