84. Qbasic Program to display 1, 12, 123, 1234, 12345

84. Write a sub procedure to display 1, 12, 123, 1234, 12345

DECLARE SUB SERIES ( )

CLS

CALL SERIES

END

SUB SERIES

FOR I = 1 TO 5

FOR J = 1 TO I

PRINT J;

NEXT J

PRINT

NEXT I

END SUB