(12C) Resistors in Parallel

[Gamo]

Program that solve up to "Four Pair" of unequal value of "Resistors in Parallel"
and little add-on program that solve for one unknown out of two parallel resistors from your desire Total.

Procedure:

1st Program:
All resistors must be "unequal" in value.
Store each value from R0 to R7
[R/S]

2nd Program
Store R0 for known Total
Store R1 for one of the two known resistor.
To run first goto line 40
[R/S]

----------------------------------------------------

Example:

Program 1: FIX 4

What is the total with 4 resistors in parallel?
50, 65, 120 and 250

50 [STO] 0
65 [STO] 1
120 [STO] 2
250 [STO] 3
[R/S] 20.9565

------------------------------------------------------

Program 2: FIX 4

1st resistor is 50 and my desire total is 28.2608
What is the 2nd resistor value?

28.2608 [STO] 0
50 [STO] 1
[GTO] 40
[R/S] 64.9996 = 65

Program:

Code:


01 RCL 0
02 1/x
03 RCL 1
04 1/x
05  +
06 RCL 2
07 X=0
08 GTO 37
09 1/x
10  +
11 RCL 3
12 X=0
13 GTO 37
14 1/x
15  +
16 RCL 4
17 X=0
18 GTO 37
19 1/x
20  +
21 RCL 5
22 X=0
23 GTO 37
24 1/x
25  +
26 RCL 6
27 X=0
28 GTO 37
29 1/x
30  +
31 RCL 7
32 X=0
33 GTO 37
34 1/x
35  +
36 GTO 38
37 X<>Y
38 1/x
39 GTO 00
--------------------------------------
40 RCL 0
41 RCL 1
42  x
43 RCL 1
44 RCL 0
45  -
46  ÷

Gamo