WP 34S mini-challenge

[Gerson W. Barbosa]

(01-21-2014 08:26 AM)walter b Wrote:  

(01-21-2014 07:59 AM)walter b Wrote:  I've got a two-step program doing what is requested.

Alas, that's not true - it doesn't preserve the stack. So I had to add some administrative steps:

Code:


LBL B
STOS 10
Σ A
STO 00
RCLS 10
DROP
RCL 00
RTN
LBL A
RTN

Enter 100,000 [XEQ] [B] and wait some seconds and you'll get 5,000,050,000. And the stack is also preserved for 8 levels. But - not counting LBL and RTN - it's one step too much now.

d

Or, if we don't mind waiting:

Code:


001  LBL A
002  DEC X
003  STO 00
004  RCL+ 00
005  DSE 00
006  BACK 002
007  INC X
008  END

One extra step, though.

Regards,

Gerson.

P.S.: My original solution uses a couple of functions whose inclusion in the WP 34S instruction set was your decision, if I am not wrong.