Casio FX-700P

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: 1982  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: BASIC expressions 
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: 2(0) kilobytes Program display: Text display  
Program memory: 2 kilobytes Program editing: Text editor  
Chipset:   Forensic result:  

fx700p.jpg (27491 bytes)A rather typical member of Casio's series of BASIC programmable calculators, the FX-700P's main claim of fame is that apparently, this was the base model from which two Russian programmable calculators, the MK-85 and the MK-85M, were developed.

The FX-700P's programming model is demonstrated here by my favorite example, 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