118. Qbasic program to print first ten odd numbers. [SLC 2071 S]

118. Write a sub program to print first ten odd numbers. [SLC 2071 S]

DECLARE SUB SERIES ( )

CLS

CALL SERIES

END

SUB SERIES

FOR I = 1 TO 10

S = S + I

NEXT I

PRINT “SUM OF FIRST  TEN POSITIVE INTEGERS” ; S

END SUB