Casio PB-110

Datasheet legend
Ab/c: Fractions calculation
AC: Alternating current
BaseN: Number base calculations
Card: Magnetic card storage
Cmem: Continuous memory
Cond: Conditional execution
Const: Scientific constants
Cplx: Complex number arithmetic
DC: Direct current
Eqlib: Equation library
Exp: Exponential/logarithmic functions
Fin: Financial functions
Grph: Graphing capability
Hyp: Hyperbolic functions
Ind: Indirect addressing
Intg: Numerical integration
Jump: Unconditional jump (GOTO)
Lbl: Program labels
LCD: Liquid Crystal Display
LED: Light-Emitting Diode
Li-ion: Lithium-ion rechargeable battery
Lreg: Linear regression (2-variable statistics)
mA: Milliamperes of current
Mtrx: Matrix support
NiCd: Nickel-Cadmium rechargeable battery
NiMH: Nickel-metal-hydrite rechargeable battery
Prnt: Printer
RTC: Real-time clock
Sdev: Standard deviation (1-variable statistics)
Solv: Equation solver
Subr: Subroutine call capability
Symb: Symbolic computing
Tape: Magnetic tape storage
Trig: Trigonometric functions
Units: Unit conversions
VAC: Volts AC
VDC: Volts DC
Years of production: 1984  Display type: Alphanumeric display  
New price:   Display color: Black  
    Display technology: Liquid crystal display 
Size: 3"×6½"×½" Display size: 12 characters
Weight: 4 oz    
    Entry method:  
Batteries: 2×"CR-2032" Lithium Advanced functions: Trig Exp Cmem Snd 
External power:   Memory functions:  
I/O: Casio I/O     
    Programming model: BASIC 
Precision: 12 digits Program functions: Jump Cond Subr Lbl Ind  
Memories: 26(0) numbers Program display: Text display  
Program memory: 544 bytes Program editing: Text editor  
Chipset:   Forensic result: 9.00000716758  

pb110.jpg (31195 bytes)Similar to the PB-100, the PB-110 is a very simple BASIC-programmable pocket computer from Casio. It offers a MEMO function on top of the PB-100's features, but one wonders how useful that is, given the machine's very limited amount of memory.

The PB-110's programming model is demonstrated here by my favorite example, the Gamma function.

10 INPUT X
20 G=1
30 IF X>5 THEN 70
40 G=G*X
50 X=X+1
60 GOTO 30
70 G=X*LN X-X+LN (SQR (2*π/X)/G)
80 PRINT G+((((1/99/X/X-1/140)/X/X+1/105)/X/X-1/30)/X/X+1)/12/X