Program to print first 10 odd numbers using SUB

DECLARE SUB DISPLAY()
CLS 

CALL DISPLAY

END

SUB DISPLAY()

A=1

FOR I= 1 TO 10

PRINT A

NEXT I

END SUB