DATA "January", "February", "March", "April", "May", "June", "July"
DATA "August", "September", "October", "November", "December"

LOCAL dat$[11]
FOR i = 0 TO 11
    READ dat$[i]
    PRINT dat$[i]
NEXT