DISPLAY 50,42,35,29,24...10ITEM
DISPLAY 50,42,35,29,24...10ITEM
DECLARER SUB SERIES()
CLS
CALL SERIES
END
SUB SERIES()
A=50
B=8
FOR I = 1 TO 10
PRINT A
A=A-B
B=B-1
NEXT I
END
CLS
CALL SERIES
END
SUB SERIES()
A=50
B=8
FOR I = 1 TO 10
PRINT A
A=A-B
B=B-1
NEXT I
END
Comments
Post a Comment