Hace un par de años compre una calculadora HP 35s, un modelo que salio en conmemoración al 35 aniversario de la primer calculadora científica de la historia: la HP 35, lanzada a principio de los años 70′s.
Hay dos cosas que me resultan interesantes en la nueva HP 35s, y es que acepta notación polaca inversa (o RPN por sus siglas en ingles) que recuerda un poco a Lisp (pero en vez de (+ 2 3) hacemos 2 3 +) y lo otro es que es programable (tal vez la única programable no gráfica?).
En estos días de mucho estudio (tengo exámenes de la universidad 
) el aburrimiento me lleva algunas veces a distraerme con cualquier cosa que haya en el escritorio, ejemplo:
Pero quise hacer algo un poco mas útil; no demasiado complicado porque en realidad no sabia hasta hace unas horas ni como entrar al modo de programación xD así que implemente un algoritmo para resolver funciones cuadráticas:
D001 LBL D
D002 RCL B
D003 x²
D004 4
D005 RCL A
D006 RCL C
D007 *
D008 *
D009 -
D010 RTN
Q001 LBL Q
Q002 SF 10
Q003 QUADRATIC
Q004 PSE
Q005 0
Q006 STO A
Q007 0
Q008 STO B
Q009 0
Q010 STO C
Q011 INPUT A
Q012 INPUT B
Q013 INPUT C
Q014 XEQ D0001
Q015 STO D
Q016 x0?
Q019 GTO Q032
Q020 RCL B
Q021 +/-
Q022 2
Q023 RCL A
Q024 *
Q025 /
Q026 CF 10
Q027 [REGX]
Q028 SF 10
Q029 STO X
Q030 VIEW X
Q031 GTO Q057
Q032 RCL B
Q033 +/-
Q034 RCL D
Q035 SQRT
Q036 +
Q037 2
Q038 RCL A
Q039 *
Q040 /
Q041 RCL B
Q042 +/-
Q043 RCL D
Q044 SQRT
Q045 -
Q046 2
Q047 RCL A
Q048 *
Q049 /
Q050 CF 10
Q051 [REGX,REGY]
Q052 SF 10
Q053 STO X
Q054 VIEW X
Q055 GTO Q057
Q056 NO REAL ROOTS
Q057 CF 10
Q058 RTN
