WP 34S mini-challenge

[Gerson W. Barbosa]

(01-21-2014 04:07 PM)Didier Lachieze Wrote:  

(01-21-2014 03:44 PM)Gerson W. Barbosa Wrote:  If we are pleased with integer arguments only, then even an HP-42S is almost possible:

Code:

00 {14-Byte Prgm}
01 LBL "GS"
02 X^2
03 RCL+ ST L
04 ??                  ;  these are not the exclusive WP 34 instructions
05 ??                  ;  I've used, but would be kind of a spoiler to the
06 ??                  ;  original solution in case they were disclosed
07 END

100000 XEQ GS --> 5000050000

but

50000 XEQ GS --> 1250024999 (too bad this error of 1 unit due to rounding error)

Cheers,

Gerson.

Well, here is a solution working on both the 42S and WP 34S, not limited to integers and where I don't see the rounding error highlighted above:

Code:

00 {15-Byte Prgm}
01 LBL "GS"
02 X^2
03 RCL+ ST L
04 1/X
05 RCL+ ST X
06 1/X
07 END

100000 XEQ GS --> 5.000.050.000
50000 XEQ GS --> 1.250.025.000

Very nice! More accurate and faster than mine, but that was the goal of the mini-challenge: to increase our arsenal of solutions for further use.

Well, at least my WP 34S program returns 1.250.025.000,000003 for that particular example, which is quite acceptable for a finite-precision machine. I will post it later.

Regards,

Gerson.