#COMPILE EXE "s21_fixed_array.exe"
' Sample: Fixed-size arrays
FUNCTION PBMAIN() AS LONG
    DIM arr(5) AS LONG, i AS LONG
    PRINT "Fixed array of 5 elements:"
    FOR i = 0 TO 4
        arr(i) = (i + 1) * 10
    NEXT i
    FOR i = 0 TO 4
        PRINT "arr("; i; ") ="; arr(i)
    NEXT i
    FUNCTION = 0
END FUNCTION
