04-16-2021, 08:29 AM
This program gives approximately 20 digits for small numbers (< 100)
Example : √7
initialization : f Σ (or 0 STO 1)
7 R/S
Display :
2 R/S
6 R/S
4 R/S
5 R/S
...
HP ≃ 2,645751311064590590505802...
√7 ≃ 2,645751311064590590501615...
Explanation (in french) : https://youtu.be/m1EieVSY6Us
Example : √7
initialization : f Σ (or 0 STO 1)
7 R/S
Display :
2 R/S
6 R/S
4 R/S
5 R/S
...
HP ≃ 2,645751311064590590505802...
√7 ≃ 2,645751311064590590501615...
Explanation (in french) : https://youtu.be/m1EieVSY6Us
Code:
1 STO 0
2 1
3 STO + 1
4 9
5 STO 2
6 RCL 4
8 20
9 ×
10 RCL 2
11 +
12 LST x
13 ×
14 STO 3
15 RCL 0
16 x ⇌ y
17 x ≤ y
18 GTO 22
19 1
20 STO - 2
21 GTO 06
22 10
24 STO × 4
25 RCL 2
26 STO + 4
27 R/S
28 RCL 3
29 STO - 0
30 100
33 STO × 0
34 GTO 02