(11C) Geometric Harmonic Arithmetic mean

[Gamo]

Program to calculate the Geometric, Harmonic and Arithmetic Mean.

Procedure:

Every new problem clear the Statistic Register

To clear Statistic Register Press [E]

Enter Data press [A] display show data count 1, 2, 3, .... n

Press [B] for Geometric Mean
Press [C] for Harmonic Mean
Press [D] for Arithmetic Mean
---------------------------------------------------------
Example: USER mode

Data: 40, 10

[E] Clear Statistic Register

40 [A] display 1
10 [A] display 2

[B] display answer for GM is 20
[C] display answer for HM is 16
[D] display answer for AM is 25
----------------------------------------------------------
Program:

Quote:LBL A
STO+6
1/x
LSTx
LN
Σ+
RTN
--------------
LBL B
X-Bar
e^x
RTN
-------------
LBL C
X-Bar
X<>Y
1/x
RTN
-------------
LBL D
RCL 6
RCL 0
÷
RTN
-------------
LBL E
[f] REG
[f] Σ
RTN

Gamo 6/2024

[Thomas Klemm]

(06-28-2024 05:07 AM)Gamo Wrote:  

Quote:ENTER
LSTx

Can be replaced by:

Code:

LSTx

---

Typo: Hamonic → Harmonic

[Gamo]

Thomas Klemm

Thank You for the corrections, I make change as you suggested.

Thanks

Gamo

[bxparks]

I think you need to clear R6 in LBL E, unless [f] [CLEAR Σ] performs that function, which I don't think it does. (EDIT: I see that [f] [REG] will clear R6, ok)