I DID IT!!

function setarraysize() as integer
    dim arraysize as integer
    input "please enter the array size: ", arraysize
    static i as integer

    for i = 0 to arraysize step 1
        dim array(arraysize) as integer
    next

    return arraysize
end function

function printvalues(arraysize as integer) as integer
        for j as integer = 0 to arraysize step 1
            print "the value of array index "; j
        next
    return 0
end function

dim arraysize as integer = setarraysize()
dim array(arraysize) as integer

for k as integer = 0 to arraysize step 1
    print "please enter the value for array index "; k; ": ";
    input "", array(k)
next

printvalues(arraysize)
sleep