89. Qbasic Program to display 5, 54, 543, 5432, 54321

89. Write a sub procedure to display 5, 54, 543, 5432, 54321

DECLARE SUB SERIES ()

CLS

CALL SERIES

END

SUB SERIES

FOR I = 5 TO 1 STEP -1

FOR J = 5 TO I STEP -1

PRINT J;

NEXT J

PRINT

NEXT I

END SUB