(08-02-2018 01:15 PM)Gamo Wrote: [ -> ]Program to calculate ratio of A/B = C/D
Procedure:
Input data clockwise start from any varibles and put zero to one unknown variable.
I think you should explain what "clockwise" means here.
Maybe this illustrates the idea:
Code:
A → C
— ↑ = ↓ —
B ← D
To make this more clear you should also choose an example where all values are different (unlike yours where the 10 appears twice):
10 : 20 = ? : 50
10 [ENTER] 0 [ENTER] 50 [ENTER] 20 [R/S] => 25
(08-02-2018 01:15 PM)Gamo Wrote: [ -> ]Program: Ratio Calculation
But more important: I wonder why the polar conversion and a tangent are used instead of two simple divisions:
Code:
01 LBL A
02 R↓
03 x≠0?
04 GTO A
05 R↓
06 ÷
07 ÷
08 RTN
This way it can also be made to work on the 12C and other calculators without trig functions. It should also run on the 10C, 25(C), 33E/C and 38E/C.
Code:
01 x=0?
02 GTO 05
03 R↓
04 GTO 01
05 R↓
06 ÷
07 ÷
08 GTO 00
What I still don't like is the error-prone input order. Something like A [ENTER] B [ENTER] C [ENTER] D would be much more intuitive.
Here's a solution that works on the 11C, 15C, 34C, 41C, 67/97 and others:
Code:
01 LBL A
02 X<>Y
03 LBL 1
04 R↓
05 x≠0?
06 GTO 1
07 R↓
08 ÷
09 ÷
10 RTN
10 : 20 = ? : 50
10 [ENTER] 20 [ENTER] 0 [ENTER] 50 [A] => 25
This improvement can also be implemented for the 10C, 12C, 25(C), 33E/C, 38E/C:
Code:
01 X<>Y
02 x=0?
03 GTO 06
04 R↓
05 GTO 02
06 R↓
07 ÷
08 ÷
09 GTO 00
10 [ENTER] 20 [ENTER] 0 [ENTER] 50 [R/S] => 25
And finally... Gamo, may I humbly ask if this program was ..."inspired" by another one you may have found somewhere ?-)
Dieter