!setup
DIM foo(10)
FOR n = LBOUND(foo) TO UBOUND(foo)
    LET foo(n) = INT(RND*99999)
NEXT n
RANDOMIZE

!random selection
LET x = INT(RND*((UBOUND(foo)-LBOUND(foo))+1))

!output
PRINT x, foo(x)
END