TI-82 Program SELECT


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