This program uses the TI-82's random number generator to select a simple random
sample from the number 1,2,...,N. First give the total N, then continue
punching the ENTER key to obtain the desired sample size.
PROGRAM:SELECT
:Disp "TOTAL"
:Input N
:Lbl 1
:iPart(rand*N)+1 -> R
:Disp R
:Pause
:Goto 1