DISPLAY 9,7,5....1

DECLARE SUB SERIES()
CLS
CALL SERIES
END

SUB SERIES()
FOR I = 9 TO 1 STEP-2
PRINT I
NEXT I
END SUB