#COMPILE EXE "s36_nested_loops.exe"
' Sample: Nested loops with labels
FUNCTION PBMAIN() AS LONG
    DIM r AS LONG, c AS LONG
    PRINT "Nested loop grid:"
    FOR r = 1 TO 3
        FOR c = 1 TO 3
            PRINT r; ","; c; "  ";
        NEXT c
        PRINT
    NEXT r
    FUNCTION = 0
END FUNCTION
