Casio FX-802P

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: 1983  Display type: Alphanumeric display  
New price:   Display color: Black  
    Display technology: Liquid crystal display 
Size: 3½"×7"×1" Display size: 12 characters
Weight: 9 oz    
    Entry method: BASIC expressions 
Batteries: 2×"CR-2032" Lithium + 4×"AAA" NiCd Advanced functions: Trig Exp Cmem Prnt 
External power: Casio adapter   Memory functions:  
I/O: Casio I/O     
    Programming model: BASIC 
Precision: 12 digits Program functions: Jump Cond Subr Lbl Ind  
Memories: 1568(0) bytes Program display: Text display  
Program memory: 1568 bytes Program editing: Text editor  
Chipset:   Forensic result: 9.00000716758  

fx802p.jpg (32502 bytes)There's not much to say about this BASIC programmable calculator from Casio. The fx-802P is about as standard as they come, with one exception: it is equipped with a small, built-in thermal printer.

The programming model of the fx-802P is illustrated by the following program I wrote that computes the logarithm of the Gamma function:

100 INPUT "X=",X
110 T=1
120 IF X>=0 THEN 160
130 T=T*X
140 X=X+1
150 GOTO 120
160 G=1.00000000019
170 G=G+76.1800917295/(X+1)
180 G=G-86.5053203294/(X+2)
190 G=G+24.0140982408/(X+3)
200 G=G-1.23173957245/(X+4)
210 G=G+1.20865097387E-3/(X+5)
220 G=G-5.39523938495E-6/(X+6)
230 G=LN (SQR (2*π)*G/X)
240 G=G-X-5.5+LN (X+5.5)*(X+.5)
250 PRINT EXP(G)/T