Sharp IQ-7000
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 |
| ||||||||||||||||||||||||||||||||||||||||||||||||||||||||
Sharp IQ-7000
This Sharp IQ-7000 wouldn't qualify as a programmable calculator were it not for its modular design, and the existence of a BASIC card that turns this high-end organizer into a full-function BASIC programmable computer.
The programming model of this BASIC interpreter is similar to that found on many other BASIC-programmable Sharp calculators. Curiously, the BASIC card also contains a built-in "AER" application, which emulates the "Algebraic Expression Reserve" formula programming method found on other Sharp handheld programmables.
The programming example below computes the logarithm of the Gamma function for any real argument. This variation makes use the so-called reflection formula that provides a simple relationship between the Gamma function values for +x and −x.
10:INPUT X 20:G=1 30:S=1 40:IF X>0 THEN 80 50:X=-X 60:G=-X*SIN(PI*X)/PI 70:S=-1 80:IF X>5 THEN 120 90:G=G/X 100:X=X+1 110:GOTO 80 120:G=S*(X*LN X-X+LN(SQRT(2*PI/X)*G)+((((1/1188/X/X-1/1680)/X/X+1/1260)/X/X-1/360)/X/X+1/12)/X) 130:PRINT G,EXP G